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ABSTRACT 


This  thesis  investigates  the  effect  of  the  sensor  location  on 
the  control  performance  of  binary  distillation  columns  with  no  side- 
stream  drawoffs. 

The  performance  of  two  pilot-scale  distillation  columns  has 
been  investigated  by  digital  simulation:  a  two-feet  diameter,  ten- 
tray  bubble  cap  column  separating  an  acetone-benzene  system  located  at 
the  University  of  Delaware  and  the  nine-inch  diameter,  eight-tray  bubble 
cap  column  separating  a  methanol -water  mixture  installed  at  the  Uni¬ 
versity  of  Alberta. 

The  dynamics  of  both  columns  were  represented  by  means  of 
transfer  functions  based  on  experimental  data  from  pulse  testing  or  the 
step  responses  of  the  columns.  Several  procedures  were  used  for  ob¬ 
taining  approximate  transfer  functions;  the  Rosenbrock  optimizing  program 
has  been  used  to  fit  the  time-domain  data  and  the  methods  of  Bailey  and 
Law,  Chen  and  Philip,  Levy,  Staff in  and  Staff in  and  Rosenbrock  have  been 
employed  to  fit  the  frequency-domain  data.  As  time-domain  data  are  more 
readily  available,  the  Rosenbrock  method  has  been  utilized  whenever 
possible  to  determine  the  distillation  process  transfer  functions.  It 
was  found  that  the  dynamics  of  the  column  as  predicted  from  the  models 
showed  satisfactory  agreement  with  experimental  data  especially  when 
the  magnitudes  of  perturbations  were  not  large. 

Feedback  control  and  combined  feedforward-feedback  control  of 
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top  product  composition,  of  bottom  product  composition  and  of  the  liquid 
temperature  (or  composition)  on  an  intermediate  tray  using  reflux  or 
steam  as  the  manipulative  variable  have  been  investigated  by  simulation. 
For  the  University  of  Delaware  column,  a  stepwise  variation  of  5  mole 
per  cent  of  acetone  was  used  as  the  forcing  function,  whereas  for  the 
University  of  Alberta  column,  a  step  change  in  feed  flow  rate  from  50 
per  cent  to  70  per  cent  on  the  feed  flow  recording  chart  was  used  as 
the  forcing  function. 

Simulation  results  revealed  that  top  product  composition  was 
best  controlled  by  manipulation  of  reflux  flow  with  direct  sensing  of 
overhead  composition  preferred.  If  by  necessity,  measurement  at  an 
intermediate  tray  is  required,  the  sensor  should  be  located  as  close  to 
the  top  tray  as  possible.  Bottom  product  composition  was  best  controlled 
by  manipulation  of  steam  flow.  Whenever  steam  is  used  as  the  corrective 
medium,  generally,  the  sensor  should  be  situated  where  if  the  liquid 
temperature  (or  composition)  on  this  tray  is  maintained  constant,  it 
would  result  in  the  least  offset  in  product  purity. 

Feedback  control  of  the  liquid  temperature  on  an  intermediate 
tray  has  been  evaluated  experimentally  using  the  University  of  Alberta 
column.  Since  all  experimental  tests  were  conducted  for  disturbances 
in  feed  flow  rate  of  large  magnitudes,  the  simulation  results  did  not 
predict  very  satisfactorily  the  steady-state  errors  observed  experi¬ 
mentally.  Despite  the  lack  of  precise  agreement,  the  models  used  in  the 
simulation  study  proved  very  helpful  in  comparing  the  performance  of  the 
column  for  different  locations  of  the  sensing  element. 
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CHAPTER  I 
INTRODUCTION 

The  primary  object  of  control  of  a  distillation  column  will 
be  to  keep  at  least  one  product  within  specification  despite  external 
disturbances  which  may  enter  the  system  such  as  feed  flow  rate,  feed 
composition,  etc.  The  present  investigation  will  be  limited  to  a  binary 
distillation  column  which  has  only  a  single  feed  stream  and  no  inter¬ 
mediate  product  streams. 

Automatic  control  of  product  quality  is  usually  accomplished 
in  one  of  two  ways: 

(i)  Holding  a  constant  rate  of  heat  input  and  varying  the  reflux 
rate  to  the  top  of  the  column  so  that  the  resulting  material  balance 
yields  the  desired  overhead  product. 

(ii)  Fixing  the  reflux  at  a  constant  rate  and  adjusting  the  heat 
input  into  the  bottom  of  the  column  to  yield  a  desired  bottom  product. 

In  order  to  achieve  the  control  of  a  distillation  column,  it 
will  usually  be  necessary  to  make  at  least  one  measurement  of  composition 
However,  despite  the  great  advances  in  on-line  analysis  techniques  in 
recent  years,  it  is  not  always  feasible  to  measure  composition  with  suffi 
cient  speed  and  accuracy  to  provide  the  necessary  information  for  the 
control  system.  A  common  indirect  method  of  gauging  product  quality  is 
the  measurement  of  the  temperature  of  the  liquid  at  its  boiling  point. 
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Indeed,  at  equilibrium  conditions,  for  a  binary  system  under  constant 
pressure  and  for  a  given  temperature,  the  composition  is  completely 
speci fied. 
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At  first  glance,  it  might  appear  advantageous  to  control  either 
the  overhead  or  the  bottom  product  composition  simply  by  locating  the 
sensor  in  the  overhead  or  the  bottom  product  line  however,  rarely  is 
this  the  case.  This  is  because  in  order  for  a  controller  to  operate, 
the  variable  which  it  is  controlling  must  be  permitted  to  vary  some, 
because  a  controller  can  only  produce  a  change  in  valve  position  con¬ 
sequent  upon  a  change  in  the  controlled  variable.  As  the  system  is  de¬ 
signed  so  that  the  compositions  (or  temperatures)  at  both  ends  of  the 
column  are  insensitive  to  disturbances,  a  composition  (or  temperature) 
measurement  several  plates  removed  from  the  ends  of  the  column  will  pro¬ 
vide  more  sensitive  control.  Also,  at  the  ends  of  the  column,  the  effects 
of  pressure  variations  on  the  temperature  of  the  liquid  at  its  boiling 
point  can  swamp  the  effects  of  composition  changes.  However,  as  the 
control  tray  is  moved  farther  away  from  the  product  to  be  controlled, 
the  steady-state  error  increases  and  there  is  deterioration  in  the 
dynamic  performance  of  the  column.  Therefore,  in  selecting  the  best 
control  tray,  a  trade-off  must  be  made  between  the  control  performance 
of  the  column  and  the  sensitivity  of  the  composition  (or  temperature) 
transducer. 

Since  there  is  no  single  tray  that  will  be  the  most  satisfactory 
for  all  possible  disturbances,  the  tray  selected  for  control,  normally 
will  only  be  the  most  suitable  "optimum"  tray  for  a  certain  specified 
disturbance.  Once  the  "optimum"  tray  has  been  located,  and  the  temper- 
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ature  of  the  liquid  on  this  tray  is  to  be  kept  constant  in  spite  of 
external  disturbances,  the  manner  of  changing  of  the  manipulative 
variable  as  a  function  of  time  to  bring  the  column  as  quickly  as 
possible  back  to  the  desired  steady-state  must  be  considered.  The 
answer  will  depend  on  the  dynamics  of  the  column.  Studies  of  the 
dynamics  of  distillation  columns  have  required  extensive  use  of  large 
scale  computing  machines.  The  most  promising  methods  available  at 
present  are  probably: 

(i)  Direct  solution  of  the  mathematical  equations  describing 
the  plant  on  an  analog  or  digital  computer. 

(ii)  Obtaining  approximate  system  transfer  functions  from  easily 
obtainable  experimental  data  such  as  transient  response,  pulse  response, 
frequency  response,  etc. 

For  a  distillation  column,  the  complexity  of  the  differential 
equations  is  such  as  to  require  many  simplifying  assumptions  in  order 
to  obtain  solutions  to  the  equations  of  the  model.  Because  of  these 
assumptions,  the  resulting  mathematical  model  is  so  limiting  that  the 
second  approach  of  using  approximate,  empirical  transfer  functions  would 
be  more  attractive.  The  control  performance  of  the  column  will  be 
studied  by  simulating  the  column  on  a  digital  computer  using  the  empirical 
models  of  the  column  and  a  two-mode  proportional  plus  integral  feedback 
controller.  Combined  feedback-feedforward  control  schemes  will  also  be 
considered. 

Finally,  experimental  tests  have  been  carried  out  on  the  pilot- 
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scale  distillation  column  located  in  the  Department  of  Chemical  and 
Petroleum  Engineering  at  the  University  of  Alberta  to  determine  the 
applicability  of  such  simulations  in  predicting  the  control  performance 
of  a  binary  distillation  column. 
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CHAPTER  II 

LITERATURE  SURVEY  ON  OPTIMUM  SENSOR  LOCATION 

The  "optimum"  location  of  control  point  in  a  distillation 
column  has  been  the  subject  of  considerable  conjecture  and  discussion 
in  the  technical  literature.  Most  of  the  earlier  work  was  empirical 
and  inspired  from  the  experience  of  its  authors  on  the  practical 
application  of  control  (16,17,57,74).  Recently,  work  has  been  done  in 
an  attempt  to  provide  a  theoretical  basis  for  the  investigation  of 
this  problem  (4,60,64,79,81).  The  rules  obtained  are  almost  invari¬ 
ably  based  either  on  the  sensitivity  of  the  composition  analyzer,  or 
on  the  steady-state  errors  of  the  desired  products,  or  on  the  control 
performance  of  the  column.  Needless  to  say,  use  of  any  design  based 
on  these  approaches  will  require  compromise  before  any  final  recommenda¬ 
tion  is  made  concerning  the  location  of  the  control  point. 

Although  there  are  different  types  of  composition  analyzers 
available  on  the  market  such  as  spectrometers,  gas  chromatographs,  etc., 
the  use  of  temperature  as  a  means  of  sensing  product  quality  is  still 
very  popular,  due  mainly  to  its  very  rapid  response  and  its  relatively 
low  cost.  For  binary  systems,  temperature  and  pressure  taken  together 
can  be  used  to  deduce  the  composition,  whereas,  for  multicomponent 
systems,  controlling  the  boiling  point  at  a  given  pressure  does  not 
exactly  fix  the  composition,  but  it  does  limit  changes  of  composition, 
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and  it  is  therefore  still  a  useful  means  of  control. 

During  the  late  1940's  and  early  1950's,  as  most  composition 
analyzers  or  temperature  indicators  and  recorders  had  poor  sensitivity, 
measurement  near  or  at  the  ends  of  the  column  was  particularly  discouraged 
by  most  of  the  authors  at  that  time  (17,57,74,75).  Tivy  (74)  has  shown 
by  experimental  results  that  the  control  of  top  product  composition  by 

locating  the  temperature  sensing  element  in  the  overhead  line  might  not 

be  satisfactory.  Indeed,  unless  stringent  composition  analyzers  are 
available  so  that  small  variations  of  the  sampled  variable  can  be  detected, 
no  matter  how  well  the  overhead  composition  was  controlled,  product 
still  varies.  Williams  et  al  (79)  in  1956  investigated  the  effect  of 
the  sensitivity  of  the  measuring  element  on  the  control  performance  of 

the  distillation  column.  It  was  found  that  if  the  error  due  to  the 

measurement  of  the  temperature  detector  is  greater  than  the  expected 
deviation  of  the  controlled  variable,  the  control  at  this  point  would 
result  in  a  poor  control  performance  of  the  column.  To  overcome  this 
problem  of  low  sensitivity  of  the  detector,  numerous  authors  suggested 
the  measurement  at  an  intermediate  tray  away  from  the  ends  of  the  column 
to  increase  the  magnitude  of  the  signal  to  the  controller. 

Some  authors  emphasized  the  importance  of  the  tray  exhibiting 
a  maximum  in  the  temperature  or  composition  gradient  curve.  Among  them, 
Pyle  (57)  proposed  that  if  reflux  flow  is  used  to  control  the  temperature, 
the  temperature  sensor  should  be  located  at  some  tray  near  and  above  the 
feed  tray  where  there  is  a  reasonable  temperature  differential  per  tray, 
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on  the  order  of  3°C  to  5W‘C.  Locating  the  temperature  detector  near  the 
point  of  feed  entry  has  the  advantage  that  fast  correction  of  temperature 
changes,  as  they  proceed  from  the  feed  tray  toward  the  top  of  the  column, 
is  possible.  However,  the  dead  time  due  to  the  liquid  flow  lag  between 
the  reflux  valve  and  the  detector  becomes  larger  as  the  sensing  location 
moves  down  the  column.  This  time  lag  which  causes  the  large  phase  shift 
in  the  high  frequency  range  must  be  decreased  in  order  to  increase  the 
control! abili ty  of  the  column.  This  consideration  certainly  led  Boyd  (17) 
and  Bertrand  and  Jones  (14)  to  a  recommendation  which  suggested  that  a 
compromise  should  be  made  between  the  point  where  the  temperature  change 
per  tray  is  maximum  and  the  point  with  the  least  time  lag.  Bertrand 
and  Jones,  by  performing  tray-to-tray  calculations  on  a  column  separating 
a  benzene-toluene  mixture,  also  showed  that  there  exist  two  plates  in 
the  column  on  each  side  of  the  feed  entry  where  the  column  temperature 
profile  is  steepest,  and  they  concluded  that  the  temperature  detector 
should  be  located  at  one  of  these  trays;  if  reflux  flow  is  used  as  the 
manipulative  variable,  the  sensor  should  be  located  in  the  rectifying 
section  and  if  steam  flow  is  used  to  control  the  temperature,  the  sensor 
should  be  positioned  in  the  stripping  section  of  the  column. 

On  the  other  hand,  other  authors  have  recomnended  the  selection 
of  the  control  tray  as  that  tray  where  the  temperature  or  composition 
change  is  greatest  for  a  given  change  in  top  product  purity.  The  reason 
for  this  selection,  as  Tivy  (74)  explained  is  that  at  this  control  tray, 
there  can  be  substantial  changes  in  temperature  without  materially  af- 


8 


fecting  the  product  purity.  Uitti  (75)  developed  a  computational  ap¬ 
proach  to  determine  the  location  of  these  control  trays  and  the  effect 
of  the  selection  of  the  sensing  point  upon  the  control  behavior  of  the 
distillation  column.  The  method  consists  of  making  numerous  McCabe- 
Thiele  calculations  in  such  a  way  that  the  total  number  of  trays  and 
the  feed  tray  location  are  held  constant.  The  reflux  flow  is  then 
varied,  and  for  each  particular  reflux  rate,  the  temperature  profile 
(corresponding  to  the  composition  profile  given  by  the  McCabe-Thiele 
diagram)  is  drawn.  Uitti  showed  that  there  exist  two  control  trays 
in  the  column  and  furthermore,  the  trays  are  those  located  approxi¬ 
mately  in  the  middle  of  the  enriching  and  stripping  sections  of  the 
column.  This  conclusion  applies  not  only  for  the  system  propane- 
isobutane  studied,  but  it  can  also  be  extended  to  any  binary  system 
whose  equilibrium  x-y  diagram  is  symmetrical.  If  the  top  product  com¬ 
position  is  to  be  maintained  constant  using  reflux  flow  as  the  mani¬ 
pulative  variable  to  control  the  temperature,  the  sensing  point  should 
be  located  at  the  control  tray  in  the  rectifying  section.  Uitti  demon¬ 
strated  that  the  overhead  composition  could  be  held  within  close  limits 
while  poor  control  of  bottom  product  composition  was  observed.  Uitti ' s 
method  of  selecting  the  location  of  the  control  point  has  found  wide 
support  from  Anisimov  (1),  Parkins  (53)  and  Fenske  and  Broughton  (25). 
Parkins  proposed  a  similar  approach  to  Uitti 's.  Most  of  the  calculations 
were  done  by  a  digital  computer  instead  of  graphically.  He  considered 
a  distillation  column  containing  20  theoretical  trays  being  utilized  to 
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separate  the  methanol -water  system.  Parkins  showed  that  the  two  trays 
which  are  most  sensitive  to  reflux  flow  disturbances  were  situated  two 
trays  away  from  the  feed  tray.  He  concluded  that  in  general,  it  is 
preferable  to  locate  the  sensing  point  at  one  of  these  trays;  the  sensor 
should  be  located  in  the  enriching  section  in  the  case  of  reflux  mani¬ 
pulation,  and  in  the  stripping  section  if  steam  is  used  as  the  corrective 
medium.  Parkins  also  mentioned  that  sometimes,  it  might  be  better  to 
accept  a  smaller  temperature  signal  to  the  temperature  controller  so  the 
sensor  could  be  located  near  the  ends  of  the  column  to  shorten  the  time 
delay  in  the  control  system.  Fenske  and  Broughton,  who  also  applied 
Uitti's  procedure,  studied  an  industrial  column  separating  the  multi  - 
component  mixture  benzene- to! uene-xylene.  The  temperature  on  an  inter¬ 
mediate  tray  was  maintained  constant  by  a  pressure-compensated  temper¬ 
ature  controller.  It  was  found  that  the  top  product  quality  is  quite 
acceptable  even  if  the  feed  composition  is  allowed  to  vary  from  one 
half  to  two  times  the  feed  composition  of  the  design  case.  Cardenas  (21) 
also  recommended  the  use  of  Uitti's  procedure  to  locate  the  control  point. 
Further,  he  pointed  out  that  within  the  accuracy  of  experimental  data, 
the  feed  composition  has  negligible  effect  upon  the  location  of  the 
temperature  control  point. 

Although  Uitti's  method  can  be  used  to  select  the  location  of 
the  sensing  point  which  would  give  an  acceptable  product  quality,  it 
is  not  necessarily  that  the  location  of  this  tray  would  result  in 
product  with  the  best  possible  purity.  In  a  computational  study,  Wood  (84) 
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demonstrated  this  situation  using  the  multicomponent  system  benzene- 
toluene-ortho,  meta  and  para-xylene.  The  steady-state  behavior  of  the 
column  was  studied  for  feed  flow  disturbances  with  the  temperature  of 
the  liquid  on  an  intermediate  tray  maintained  constant  by  varying  the 
reflux  flow  rate.  Only  the  calculated  temperatures  for  trays  8,  10, 

14  were  reported  (trays  are  numbered  from  the  top  down).  By  plotting 
the  liquid  temperature  on  an  intermediate  tray. versus  the  top  product  com¬ 
position  for  different  feed  flow  rates,  it  was  shown  that,  corresponding 
to  a  decrease  of  10  per  cent  in  feed  flow  rate,  tray  14  is  the  most 
sensitive  tray.  However,  it  was  found  that  maintaining  the  liquid 
temperature  on  this  tray  constant  would  cause  an  offset  of  80  ppm  of 
toluene  in  the  overhead  product,  whereas  if  the  liquid  temperature  on 
tray  8,  the  least  sensitive  of  all  three  trays  considered,  is  held 
constant,  a  steady-state  offset  in  the  overhead  composition  of  only 
40  ppm  would  result.  He  concluded  that  the  sensor  should  be  located 
at  tray  8  because  use  of  this  control  tray  resulted  in  the  least  off¬ 
set  in  product  purity. 

An  alternate  approach  to  selecting  a  control  point  in  the 
column  is  to  consider  the  actual  control  performance  of  the  column. 

Rose  and  Williams  (60)  studied  the  control  behavior  of  a  distillation 
column  and  associated  feedback  controller  by  simulation.  The  main 
objective  was  to  determine  suitable  controller  settings  which  would 
simultaneously  keep  the  liquid  temperature  on  an  intermediate  tray 
constant  and  result  in  the  least  offset  in  the  overhead  composition. 

It  was  demonstrated  that  the  direct  control  of  top  product  composition 
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is  to  be  avoided  due  to  a  considerable  delay  occurring  in  the  condenser 
line  which  would  cause  instability  for  all  but  very  small  values  of 
the  controller  gain.  Rose  and  Williams  recommended  that  locating  the 
sensor  on  the  top  tray,  the  tray  nearest  the  reflux  valve,  will  give 
the  best  control  if  the  sensor  is  sensitive  enough  to  detect  the  re¬ 
quired  range  of  composition  variations .  When  the  sensor  is  not  very 
sensitive,  locating  it  on  a  lower  plate  may  result  in  more  accurate 
control.  Other  authors  such  as  Izawa  and  Morinaga  (35)  and  Buckley  (19) 
supported  this  criterion  for  selecting  the  control  point  in  a  distilla¬ 
tion  column.  Buckley  also  suggested  that  if  bottom  product  composition 
is  desired,  steam  flow  should  be  used  as  the  manipulative  variable  and 
the  detector  should  be  located  in  the  liquid  line  to  the  reboiler  or 
in  the  vapor  space  below  the  bottom  tray.  Auns  (4)  investigated  the 
control  behavior  of  a  distillation  column  by  simulation  on  an  analog 
computer.  The  data  employed  was  from  the  column  used  by  Gerster  et  al  (40). 
This  column  has  ten  trays  and  feed  enters  at  tray  5  (trays  are  numbered 
from  the  bottom  up).  Its  dynamic  behavior  was  described  by  a  set  of 
second  order  transfer  functions  which  best  fitted  the  experimental  data 
given  by  the  authors  (40).  Different  control  schemes  such  as  feedback, 
combined  feedforward-feedback  using  reflux  or  steam  as  the  manipulative 
variable  were  studied.  The  procedure  was  developed  with  the  intent 
of  minimizing  the  integral  of  the  squared  error  of  the  liquid  composition 
on  each  intermediate  tray  by  finding  suitable  controller  settings.  The 
recommended  control  tray  is  the  tray  where  if  the  liquid  composition  on 
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this  tray  is  kept  constant  in  spite  of  disturbances  in  feed  composition, 
would  give  the  best  possible  product  purity.  It  was  found  that  best 
top  product  composition  control  by  both  feedback  and  instantaneous  feed¬ 
forward  plus  feedback  control  schemes  was  achieved  by  manipulation  of 
reflux  flow  with  the  sensor  on  tray  7.  Best  bottom  product  composition 
control  by  both  feedback  and  instantaneous  feedforward  plus  feedback 
control  schemes  was  achieved  by  manipulation  of  steam  flow  with  the 
sensor  on  tray  3. 

One  of  the  most  interesting  approaches  to  the  problem  of 
selecting  the  optimal  control  tray  is  that  of  Rosenbrock  (64)  which  is 
based  on  the  concept  of  a  "disturbance  function".  Rosenbrock  defined 
his  disturbance  as  the  sum  of  the  magnitudes  of  the  rates  of  change  of 
the  liquid  composition  on  all  the  trays,  that  is: 


D  = 


n+1  , 

*  h< 


where  H.  and  are  the  liquid  hold-up  and  the  liquid  composition  on 
the  ith  tray  respectively.  The  sum  is  taken  over  all  plates,  the  re¬ 
boiler  and  the  condenser.  The  above  definition  applies  only  to  a 
binary  distillation  column,  but  with  suitable  restrictions,  may  be 
extended  to  include  multicomponent  systems.  The  "disturbance  function", 
D,  turns  out  to  be  very  useful  as  a  measure  of  the  degree  of  departure 
of  the  system  from  steady-state.  Rosenbrock  has  shown  that  the  dis¬ 
turbance  function  constitutes  a  Lyapunov  function  for  a  binary  system 
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and  as  such,  can  be  used  to  investigate  stability  of  the  system.  By 
an  appropriate  physical  interpretation,  a  controller  can  be  devised 
which  tends  to  reduce  D  to  zero  in  as  short  a  time  as  possible.  In 
some  cases,  the  reduction  in  D  can  be  accomplished  by  accepting  de¬ 
viations  of  the  outlet  compositions  from  their  desired  degrees  of 
purity.  Thus,  an  additional  measure  of  the  behavior  is  introduced 
and  called  "variation  of  product"  and  is  defined  as: 

n+1  dXo  ft  dy. 

G  =  L  [Li  I  '^|dt  +  J  'a^|dt] 

0  6 

where  is  the  liquid  flow  rate  of  tray  i  with  liquid  composition  x. 
and  V. j  is  the  vapor  flow  rate  of  tray  i  with  vapor  composition  y. . 

In  terms  of  D  and  G,  the  control  objective  can  then  be  stated  as  the 
reduction  of  D  to  zero  in  as  short  a  time  as  possible  with  the  require¬ 
ment  that  the  increase  of  G  be  kept  as  small  as  possible.  This  is  a 

problem  which  can  be  approached  by  variational  methods  or  by  dynamic 
programming.  Originally  the  problem  does  not  appear  to  be  tractable, 
however,  with  a  few  assumptions  and  using  some  geometric  arguments, 
the  requirements  for  the  optimal  control  tray  location  may  often  be 
reduced  to  a  relatively  simple  form.  For  example,  if  the  number  of 

j 

changes  of  signs  of  |H.j  x.  |  within  the  column  is  assumed  to  be  known 
and  equal  at  least  to  2  (which  is  usually  the  case)  and  the  values  of 
H.  all  constant,  the  following  conclusions  can  be  withdrawn: 

(i)  If  the  reflux  flow  alone  is  to  be  manipulated,  in  general. 
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the  strategy  is  to  prevent  any  change  in  composition  on  one  of  two  trays 
where  the  actual  liquid  compositions  differ  by  j  (xn+-|“xo)-  the  major 
disturbance  is  caused  by  variation  in  feed  composition,  for  optimal 
control,  it  is  best  to  maintain  a  constant  composition  on  the  tray 
where  the  desired  liquid  composition  is: 

Xi  =  Xf  ±  J  (xn+l  '  V 

where  xf,  xn+-| ,  xq  are  the  liquid  composition  at  the  feed  tray,  the 
condenser  and  the  reboiler  respecti vely . 

(ii)  Similar  results  were  obtained  if  boil-up  rate  alone  is  used 
to  control  the  distillation  column,  the  strategy  is  to  maintain  the 
composition  on  the  tray  where  the  desired  vapor  composition  is: 

*1 =  ±t  (Vrxo> 

where  y^  is  the  vapor  composition  at  the  feed  tray* 

For  all  practical  purposes,  these  requirements  are  the  same  as  for  control 
by  means  of  the  reflux. 

In  spite  of  all  the  virtues  of  sensing  at  an  intermediate 
tray,  the  control  of  a  distillation  column  by  this  method  also  has  its 
disadvantages  namely: 

(i)  The  relationship  between  the  liquid  composition  (or  temperature) 
on  an  intermediate  tray  and  the  overhead  or  bottom  product  composition 
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is  ambiguous. 

(ii)  It  is  well  known  that  large  variations  in  the  composition 
(or  temperature)  in  the  central  part  of  the  column  can  occur  when  dis¬ 
turbances  in  product  composition  produced  by  feed  composition  or  feed 
flow  variations  are  cancelled  by  action  of  feedforward  controllers. 

Thus,  use  of  the  liquid  composition  (or  temperature)  on  an  intermediate 
tray  to  generate  large  error  signals  in  feedback  loop  can  lead  to 
serious  difficulties,  particularly  in  the  presence  of  feedforward  control. 
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CHAPTER  III 
CONTROL  SCHEMES 


3.1  Introduction 

The  best  location  of  the  sensing  element  for  temperature 
control  of  any  distillation  column  should  be  based  not  only  on  the 
steady-state  errors  in  product  compositions,  but  also  on  the  dynamic 
performance  of  the  column.  Both,  in  turn,  depend  on  the  control 
scheme  chosen  for  the  control  of  the  distillation  column. 

The  detection  of  the  presence  of  the  upset  can  be  accomplished 
by  measuring  the  composition  of  any  dependent  stream  in  the  column  by 
means  of  infrared  analyzers,  refractometers ,  chromatographs,  etc., 
or  simply  by  means  of  its  temperature.  The  correction  may  be  carried 
out  principally  in  two  ways.  In  one  scheme,  the  independent  variable 
subject  to  upset  may  be  measured,  then  when  the  upset  occurs,  action 
is  taken  to  prevent  its  effects  from  reaching  the  process  or  to  prepare 
the  process  ahead  of  time  for  the  disturbance.  Such  control  is  known 
as  feedforward  control.  Feedforward  control  can  be  quite  satisfactory , 
but  its  disadvantage  is  that  every  independent  variable  that  may  affect 
the  process  must  be  detected  and  its  possible  effects  compensated.  In 
the  second  type  of  control,  the  dependent  variable  governing  product 
rate  or  quality  is  measured.  Then  when  the  presence  of  an  upset  is 
detected  by  deviations  of  this  variable  from  a  desired  value,  changes 
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can  be  made  in  operating  conditions  of  the  process  which  would  tend  to 
correct  the  detected  deviation  and  thus  compensate  for  the  upset.  Such 
control  is  known  as  feedback  control.  Feedback  control  is  by  far  the 
most  common  and  must  be  used  even  in  conjunction  with  feedforward 
control;  theoretically,  only  one  detecting  instrument  and  one  controller 
are  necessary  for  the  whole  process,  rather  than  one  on  each  independent 
variable  as  for  feedforward  control.  This  concept  of  simplicity,  how¬ 
ever,  suffers  from  two  important  drawbacks.  First,  for  complex  pro¬ 
cesses,  one  correction  method  can  not  possibly  compensate  for  the 
effects  of  variations  in  several  different  variables,  secondly,  a 
deviation  must  occur  in  the  value  of  the  sampled  dependent  variable 
before  corrective  action  can  be  taken,  thus  the  variable  can  not  be 
maintained  exactly  at  the  desired  specifications.  It  is  advantageous 
in  some  cases  to  couple  feedforward  systems  to  feedback  loops.  The 
resulting  control  system  is  usually  known  simply  as  a  combined  feed- 
forward-feedback  control  system. 

3.2  Literature  Survey  on  Control  Schemes 

Considerable  has  been  written  on  control  schemes  used  for 
continuous  distillation  columns.  Pyle  (57)  set  down  the  results  of 
experience,  discussing  the  considerations  to  be  made  in  instrumenting 
a  column  with  no  intermediate  product  stream.  Boyd  (16,17)  presented 
recommendations  for  regulating  column  pressure  and  other  variables. 

He  also  suggested  a  "material  balance  control  system"  to  keep  product 
compositions  constant  when  feed  flow  rate  changes.  Control  systems 


, 
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for  commercial  distillation  columns  have  also  been  reported  by  Lupfer 
and  Oglesby  (38)  and  Wherry  and  Berger  (76).  Luyben  (43)  has  reviewed 
some  of  the  many  control  schemes  used  to  control  complex  distillation 
columns . 

It  is  quite  apparent  that  there  are  many  types  of  control 
systems  which  can  be  utilized  to  operate  a  distillation  tower.  While 
all  will  work  to  some  degree,  each  appears  to  have  specific  limitations, 
advantages  and  disadvantages.  Any  analysis  of  the  various  control 
system  should  take  into  account  the  behavior  of  the  column  itself 
and  the  effect  of  the  control  system  on  fractionating  capacity.  The 
present  philosophy  to  select  a  control  scheme  for  a  continuous  dis¬ 
tillation  column  concerns  itself  with  the  following  apsects: 

(i)  The  goals  of  the  process, 

(ii)  The  choice  of  controlled  and  correcting  variables. 

(iii)  Method  of  measurement  of  the  quality  of  controlled  variable. 

( i v )  Performance  of  a  given  control  scheme. 

Since  the  degree  of  separation  of  a  distillation  column 
bears  directly  on  the  choice  of  the  proper  control  system,  the  goals 
are  an  integral  part  of  the  control  problem.  For  the  most  part, 
literature  dealing  with  the  column  control  considers  only  the  operational 
goal  of  the  process,  that  is,  how  to  design  a  control  system  which 
would  produce  a  certain  material  within  its  specified  purity.  Recently, 
there  has  been  increasing  interest  in  the  economic  aspects  of  the  control 
problem.  Phister  (54)  presented  a  discussion  that  emphasized  the  role 
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of  dollar  return  in  fixing  the  objective  of  a  control  system.  Archer  (2) 
discussed  the  goal  of  an  optimizing  control  scheme  for  maximizing  the 
profitability  of  a  particular  distillation  separation0 

In  choosing  the  controlled  variables,  it  is  necessary  to 
be  cognizant  of  the  available  degrees  of  freedom  in  the  system  being 
considered.  Control  is  inherently  more  difficult  as  the  number  of 
degrees  of  freedom  increases  (43).  Parkins  (53)  regarded  the  distilla¬ 
tion  tower  as  an  energy  system  and  therefore  the  control  problem  is 
one  of  regulating  the  energy  balance  of  the  column.  He  discussed  basic 
principles  and  outlined  some  guidelines  for  setting  up  a  distillation 
control  system  and  presented  methods  of  satisfying  these  guidelines 
along  with  illustrative  control  schemes.  Williams  (81)  listed  the 
column  variables  and  cl  ass i fed  them  as  external  independent,  internal 
independent,  semi -independent  or  dependent.  He  concluded  that  the 
problem  is  one  of  choosing  which  two  of  four  internal  independent 
variables  should  be  controlled.  The  four  internal  Independent  vari¬ 
ables  for  selection  were  shown  to  be  the  overhead  product  composition, 
the  bottom  product  composition,  the  ratio  of  boil -up  rate  to  feed  rate 
and  the  ratio  of  distillate  to  bottom  flow  rate.  He  also  noted  that 
the  most  important  semi-independent  variable  of  column  operation  is 
feed  plate  location.  The  optimum  location  of  feed  plate  is  a  function 
of  both  feed  flow  rate  as  well  as  feed  composition.  For  some  possible 
wide  variations  of  feed  rate  and  feed  composition,  reduction  in  column 
separating  capacity  beyond  the  capability  of  the  control  system  to 
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correct  may  occur .  Thus,  some  sort  of  automatic  feed  plate  changes 
would  be  desirable.  This  idea  has  led  Lupfer  and  Johnson  (39)  to 
develop  an  "optimum"  automatic  control  scheme  for  a  distillation 
column  which  does  not  only  manipulate  both  reflux  and  steam  flows 
but  also  provides  for  manipulation  of  the  feed  enthalpy  and  feed 
plate  location.  This  optimizing  control  system  has  been  evaluated 
on  a  large  debutanizer  column  using  the  "predictive  control"  approach. 

Another  factor  which  should  be  considered  in  any  final 
control  scheme  is  the  use  of  the  analytical  equipment  for  sensing 
product  purity.  At  present,  direct  composition  analyzers  are  not 
widely  used  as  they  are  not  very  reliable,  have  a  large  measurement 
lag  and  operate  on  an  intermittent  cycle.  It  should  be  pointed  out 
here  that  whenever  composition  analyzers  are  used,  the  minimum  sampling 
rate  which  can  be  tolerated  should  be  determined.  In  general,  the 
sampling  cycle  permitted  should  be  less  than  one  half  the  mixing  time 
constant  for  a  plate  in  the  column  (81).  Until  the  difficulties  associ¬ 
ated  with  sampled  data  control  are  overcome  or  high  speed  composition 
analyzers  are  developed,  temperature  control  would  be  preferred.  How¬ 
ever,  a  pressure  control  system  is  necessary  in  most  temperature 
control  schemes. 

A  qualitative  discussion  and  comparison  of  various  conventional 
control  systems  which  can  be  used  to  control  any  distillation  column, 
binary  or  multicomponent  with  single  feed  stream  and  no  sidestream  draw¬ 
off  follows. 
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(i)  Control  Scheme  "A". 

The  control  scheme  shown  in  Figure  3.2-1  is  the  most  direct 
scheme  used  to  control  the  overhead  composition  by  keeping  the  liquid 
temperature  on  an  intermediate  tray  constant  in  spite  of  external 
disturbances o  The  signal  from  the  temperature  controller  is  used  to 
adjust  the  distillate  flow  rate.  The  reflux  flow  is  regulated  by  an 
averaging  type  controller  which  is  used  to  control  the  liquid  level 
in  the  reflux  accumulator.  The  latter  serves  mainly  to  keep  a  liquid 
seal  on  the  reflux  and  product  lines  and  to  provide  disengaging  space 
for  non-condensables.  A  constant  vapor  flow  is  maintained  by  controlling 
the  steam  flow  rate.  The  bottom  flow  rate  is  adjusted  by  the  reboiler 
level  controller. 

Use  of  a  large  reflux  drum  can  be  a  help  in  damping  changes 
in  flow  and  in  providing  a  reservoir  of  high  purity  material  for  the 
reflux,  but  this  causes  the  reflux  flow  to  be  sluggish.  It  has  also 
been  pointed  out  that  the  control  behavior  may  also  deteriorate  because 
of  inadequate  mixing  in  the  reflux  accumulator  (76).  The  major  weak¬ 
ness  of  this  control  scheme  is  that  any  fluctuations  in  the  condenser 
vapor  rate  would  be  propagated  by  the  reflux  accumulator  level  con¬ 
troller  to  the  reflux  stream.  It  has  been  shown  that  such  fluctuations 
can  be  self-propagating  and  can  lead  to  sustained  control  oscillations, 
especially  if  cold  reflux  is  used  on  the  column  (82). 


(ii)  Control  Scheme  "B". 

Figure  3.2-2  shows  a  control  scheme  commonly  used  on  distillation 
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Figure  3.2-1  Temperature  Control  Scheme  by  Manipulation  of  Distillation  Flow 
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columns  to  keep  the  overhead  composition  within  its  specified  tolerance. 
This  scheme  is  very  similar  to  the  first  control  scheme  but  care  has 
been  taken  to  control  the  amount  of  reflux  fed  back  to  the  column 
rather  than  to  control  directly  the  amount  of  distillate  withdrawn. 
Harriot  (29)  reported  that  this  control  scheme  is  very  sensitive 
to  changes  in  reflux  temperature.  Besides,  with  high  reflux  ratios, 
a  slight  change  in  vapor  flow  rate  will  lead  to  a  very  large  change 
in  distillate  flow  until  the  temperature  controller  sensed  the  change 
and  varied  the  reflux  flow.  However,  its  steady-state  performance 
remains  unimpaired  even  at  high  reflux  ratios  (9). 

Both  control  schemes  "A"  and  "B"  can  provide  satisfactory 
control  of  overhead  composition  provided  the  proper  location  of  the 
temperature  control  point  has  been  chosen  and  the  column  feed  rate 
is  not  in  excess  of  the  column  capacity.  The  control  of  bottom  product 
composition  using  either  of  these  two  schemes  is  not  practical  since 
there  is  a  large  delay  before  changes  in  reflux  flow  rate  are  noticed 
at  the  bottom  of  the  column.  One  of  the  disadvantages  of  these  two 
schemes  is  that  it  is  possible  to  waste  steam  when  feed  rate  is  re¬ 
duced  to  a  low  value.  It  is,  however,  a  simple  matter  to  change  the 
steam  rate  when  feed  rate  is  changed.  It  can  be  done  by  using  the 
steam  rate-feed  rate  ratio  controller  recommended  by  Williams  (81). 

These  control  schemes  also  suffer  from  the  disadvantage  that  they  do 
not  insure  that  the  tower  operates  as  a  fractionating  column  in  the 
event  of  foaming  or  plugging.  To  remedy  this  problem,  Tivy  (74)  sug- 
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Figure  3.2-2  Temperature  Control  Scheme  by  Manipulation  of  Reflux  Flow 
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gested  that  the  proper  boil -up  should  be  maintained  in  the  column  by 
regulating  the  steam  flow  rate.  As  the  pressure  drop  is  normally  a 
reliable  indication  of  the  boil -up  rate,  it  is  a  common  practice  to 
control  the  steam  to  the  reboiler  by  the  pressure  of  the  vapor  below 
the  bottom  plate  of  the  column.  This  is  equivalent  to  control  of  the 
pressure  drop  across  the  tower  when  the  pressure  at  the  condenser 
vent  is  at  atmospheric.  Therefore  it  is  possible  to  control  the 
pressure  just  below  the  flooding  point  and  operate  the  column  at  its 
maximum  capacity. 

(iii)  Control  Scheme  "C" 

The  third  control  scheme  consists  of  changing  the  steam 
flow  rate  to  maintain  a  constant  liquid  temperature  on  any  intermediate 
tray.  The  reflux  flow  is  controlled  at  a  fixed  value,  whereas  the 
distillate  flow  and  the  bottom  flow  rates  are  regulated  by  the  reflux 
accumulator  and  the  reboiler  level  respectively  (Figure  3.2-3).  This 
scheme  is  normally  used  to  control  bottom  product  composition,  although 
it  can  be  used  to  control  top  product  composition  but  the  resulting 
control  is  generally  poor.  Indeed,  for  top  product  composition  control, 
if  the  sensing  element  is  almost  at  the  top  of  the  column,  the  wide 
separation  of  the  temperature  controller  and  the  controlled  flow  is 
unsatisfactory  from  a  dynamic  standpoint  and  the  system  is  slower  than 
the  first  two  control  schemes.  In  such  a  control  system,  if  the  sensing 
is  located  close  to  the  bottom  tray,  a  large  offset  in  the  overhead 
composition  would  normally  result. 

The  advantage  of  this  arrangement  is  that  it  operates  the 
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Figure  3.2-3  Temperature  Control  Scheme  by  Manipulation  of  Steam  Flow 
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column  with  a  minimum  consumption  of  steam.  The  main  disadvantage  is 
that  it  does  not  insure  that  the  column  operates  as  a  fractionating 
device  as  there  is  no  indication  as  to  how  near  to  loading  the  column 
may  be,  since  loading  is  a  function  of  the  boil -up  rate  and  not  the 
temperature. 

This  scheme  is  frequently  employed  and  often  gives  satis¬ 
factory  control.  Another  scheme,  which  uses  a  reversed  arrangement 
of  the  control  loops,  that  is  direct  control  of  the  bottom  flow  rate 
by  the  temperature  controller,  with  the  steam  flow  regulated  by  the 
reboiler  level  controller,  is  sometimes  used, 

(iv)  Control  Scheme  "D" . 

By  controlling  the  reflux  flow  rate,  the  overhead  composition 
can  be  kept  almost  constant  (in  the  steady-state)  in  spite  of  external 
disturbances.  Unfortunately,  the  bottom  product  concentration  does 
change.  If  both  product  compositions  are  to  be  maintained  constant, 
another  temperature  controller  which  would  manipulate  the  reboiler  heat 
input  will  be  required  to  maintain  bottom  product  composition  constant. 
Such  a  control  scheme  is  known  as  a  two-point  control  system.  Figure 
3.2-4  shows  the  control  scheme  recommended  by  Robinson  and  Gilliland  (59). 

From  a  steady-state  view  point,  it  has  been  shown  that  both 
compositions  can  be  controlled  independently  (29).  Parkins  (53),  based 
on  his  energy  or  "dynamic  balance"  concept,  saw  no  reason  why  two 
temperature  controllers  should  not  be  used  because  the  temperature  pattern 
will  move  until  the  two  temperature  settings  are  satisfied.  Although 
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Figure  3.2-4  Two-Point  Temperature  Control  Scheme 
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control  of  both  product  compositions  has  a  potential  advantage  over 
single  point  control,  it  has  been  pointed  out  in  the  literature  (39,64) 
that  it  is  unwise  to  use  two-point  control  system.  First,  if  the  feed 
contains  an  impurity  having  a  relative  volatility  between  those  of 
distillate  and  bottom  product,  automatic  control  on  both  reflux  and 
boil -up  presents  a  problem.  The  reflux  control  operates  to  return 
the  impurity  down  the  column,  while  the  boil -up  control  operates  to 
send  the  impurity  up  the  column.  The  result  is  that  the  intermediate 
boiling  impurity  tends  to  accumulate  in  the  middle  of  the  column  and 
displaces  the  composition  pattern  to  such  an  extent  that  separation 
fails.  The  second  reason  is  a  result  of  interaction  of  the  two  temper¬ 
ature  control  loops.  Some  columns  are  operating  under  no  difficulty 
with  a  two-point  control  system  (44),  others  have  implied  that  such  a 
scheme  is  unconventional  or  even  unworkable  (3,82).  Rosenbrock  (64) 
presented  a  detailed  study  of  the  effects  of  interaction  of  the  control 
loops.  Results  from  simulation  on  an  analog  computer  showed  that  in 
some  cases  the  control  loops  interact  so  strongly  that  control  can  not 
be  achieved.  By  changing  one  of  the  time  constants  from  83  to  167 
minutes,  interaction  between  the  two  control  loops  was  eliminated. 

This  may  perhaps  explain  the  conflicting  view  of  process  control  engi¬ 
neers  about  the  possibility  of  achieving  control  at  both  ends  of  the 
column.  The  procedure  for  causing  two  interacting  control  loops  to  be 
non-interacting  is  known  (48).  Such  decoupling  requires  a  mathematical 
model  of  the  process.  The  inability  to  accurately  describe  the  dynamic 
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behavior  of  industrial  columns  makes  this  approach  prohibitive  at  the 
present  time. 

In  all  the  control  schemes  discussed  so  far,  the  split  be¬ 
tween  the  overhead  and  bottom  product  flows  is  automatically  adjusted 
to  maintain  a  constant  temperature  at  some  point  in  the  col  unin  0  This 
method  of  control  would  be  effective  only  when  the  temperature  fluctu¬ 
ations  resulting  from  possible  pressure  variations  are  much  smaller 
than  those  resulting  from  actual  changes  in  composition  The  sensitivity 
of  temperature  to  pressure  changes  suggests  that  where  temperature  is 
to  be  used  for  distillation  column  control,  the  temperature  measurement 
should  be  pressure-compensated,  the  only  possible  exception  being 
temperature  control  of  distillation  columns  at  atmospheric  pressure= 

If  very  close  control  of  product  purity  is  not  necessary,  the  control 
of  pressure  at  the  top  of  the  column  would  be  adequate  in  most  cases . 
Several  control  schemes  have  been  recommended  by  Pyle  (57),  and  later 
by  Boyd  (16)  to  control  the  pressure  at  the  reflux  accumulator  of  dis¬ 
tillation  columns  operating  under  vacuum,  atmospheric  and  high  pressure 
condi tionSo  They  depend  mainly  on  regulating  the  area  or  driving  force 
for  heat  transfer  in  the  condenser  or  on  by-passing  some  gas  to  the 
reflux  drum.  These  pressure  control  systems  would  not  be  very  satis¬ 
factory  if  pressure  effects  can  be  of  major  importance  such  as  dis¬ 
tillation  columns  yielding  high  purity  products,  where  variations  in 
pressure  due  to  barometric  or  column  pressure  changes  may  have  more 
effect  on  the  temperature  than  changes  in  compositiono  For  binary  sepa- 
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rations,  column  pressure  dependence  can  be  reduced  by  using  a  differential 
temperature  control  scheme  or  special-purpose  temperature  transducers. 

The  differential  temperature  method  to  compensate  for  pressure  vari¬ 
ations  proposed  by  Tivy  (74)  has  proven  to  be  quite  satisfactory  when 
a  good  reference  point  is  available  and  when  the  differential  pressure 
variations  between  the  reference  point  and  control  point  do  not  cause 
the  control  system  to  be  unstable  (45).  Tivy  also  suggested  that 
temperature  can  be  used  as  a  reliable  measure  of  composition  if  a  dif¬ 
ferential  vapor  pressure  transducer  is  used.  Buckley  (19)  recommended 
pressure  compensation  of  temperature  by  measuring  both  temperature  and 
pressure  at  the  control  tray  and  computing  a  "compensated  temperature". 

The  selection  of  the  best  control  scheme  for  a  specific  dis¬ 
tillation  column  is  governed  by  economic  process  considerations  and  the 
desired  column  performance.  The  latter  generally  implies  feedback 
control  of  liquid  temperature  on  an  intermediate  tray.  Some  recent  articles 
show  how  steady-state  calculations  can  be  used  to  help  select  a  control 
scheme  (9,84). 

Despite  the  numerous  articles  concerned  with  feedforward  and 
combined  feedforward-feedback  binary  distillation  column  control,  the 
problem  of  feedforward  plus  feedback  of  the  liquid  temperature  on  an  inter¬ 
mediate  tray  has  received  little  attention  in  the  literature.  The  only 
study  which  is  pertinent  to  this  problem  is  that  of  Luyben  (45).  Re¬ 
sults  from  a  digital  simulation  study  of  the  control  behavior  of  a  20 
theoretical  tray  distillation  column  showed  that  feedforward  plus  feed- 
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back  control  provided  effective  control  using  an  intermediate  control 
tray.  Indeed,  with  the  proper  feedforward  controller  transfer 
functions,  steady-state  errors  in  product  compositions  were  eliminated, 
while  addition  of  feedforward  control  reduced  the  interaction  between 
the  two  feedback  loops  in  the  case  of  the  two-point  control  system. 

3.3  Control  Schemes  Evaluated 

In  this  investigation,  control  schemes  "B"  and  "C"  have  been 
evaluated  for  disturbances  in  feed  conditions  by  digital  simulation 
and  experimental  tests.  In  the  experimental  tests,  care  was  taken  to 
ensure  that  the  only  disturbance  to  the  column  was  feed  flow  rate. 

As  a  cold  feed  condenses  some  vapor  at  the  feed  plate  which  leads  to 
different  fractionating  capacity,  feed  temperature  control  was  employed 
to  keep  any  feed  temperature  disturbances  from  entering  the  system. 
Steam  flow  as  regulated  by  a  feedback  temperature  controller  was  used 
to  maintain  feed  temperature  constant  at  slightly  below  its  boiling 
point  in  spite  of  variations  in  feed  flow  rate.  A  similar  control 
loop  was  employed  to  maintain  constant  reflux  temperature.  Effects 
of  barometric  pressure  on  the  controlled  temperature  can  be  reduced 
by  using  a  simple  pressure  control  scheme.  The  pressure  in  the  con¬ 
denser  was  kept  at  nearly  atmospheric  conditions  by  varying  the  flow 
rate  of  cooling  water.  A  large  vent  was  also  located  at  the  condenser 
to  keep  the  condenser  at  substantially  the  same  pressure  regardless  of 
the  load  on  the  column. 

A  schematic  representation  of  the  column  and  the  principal 
control  loops  investigated  is  shown  in  Figures  3.3-1  and  3.3-2. 
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Figure  3.3-1  Evaluated  Control  Scheme  by  Manipulation  of  Reflux  Flow 
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Figure  3.3-2  Evaluated  Control  Scheme  by  Manipulation  of  Steam  Flow 
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CHAPTER  IV 

METHODS  FOR  THE  DETERMINATION  OF  APPROXIMATE 

SYSTEM  TRANSFER  FUNCTIONS 

4.1  Introduction 

The  use  of  transfer  functions  to  represent  the  dynamic 
characteristics  of  a  system  which  is  linear  or  can  be  assumed  to  be 
linear  for  small  changes  is  extremely  popular  in  the  fields  of  process 
dynamics  and  control. 

In  order  to  arrive  at  a  rigorous  transfer  function,  the 
system  must  be  described  with  mathematical  rigour,  but  often,  the 
ability  to  formulate  the  rigorous  model  is  limited  by  basic  knowledge 
of  the  process  under  consideration.  Furthermore,  this  mathematical 
model  must  yield  linear  differential  equations  if  the  transfer  function 
concept  is  to  be  used.  The  usual  approach  is  to  make  certain  simplifying 
assumptions  about  the  process  which  facilitate  the  formulation  of  an 
approximate  mathematical  model.  It  is  then  possible  to  proceed  with 
the  linearization,  if  necessary,  and  to  evaluate  the  approximate  system 
transfer  function.  Quite  frequently,  the  simplifying  assumptions  which 
must  be  made  in  model  formulation  are  so  limiting  that  it  would  be  just 
as  appropriate  to  start  with  an  empirical  transfer  function  determined 
from  transient  or  frequency  response  data. 

Methods  of  obtaining  an  approximate  empirical  transfer  function 
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from  easily  obtainable  data  are  to  be  considered.  Transient  response, 
pulse  and  frequency  response  data  are  utilized. 

4.2  Literature  Survey  on  Different  Methods  for  the  Determination  of 

Approximate  System  Transfer  Functions 

The  construction  of  an  empirical  transfer  function  includes 
methods  of  determining  the  parameters  of  the  model  from  both  the  time- 
domain  and  frequency-domain  data. 

To  determine  the  transfer  function  from  time-domain  data, 
it  is  necessary  to  derive  an  analytical  function  in  terms  of  the  para¬ 
meters  of  the  transfer  function  in  such  a  way  that  the  response  curve 
generated  by  the  model  comes  as  close  as  possible  to  the  true  transient 
response.  Here  the  method  of  least  squares  fitting  may  be  regarded  as 
the  best  approach  available.  Numerous  least  squares  fitting  procedures 
have  appeared  in  the  literature,  but  two  of  the  more  useful  methods  are 
the  ones  developed  by  Powell  (55,56)  and  Rosenbrock  (63).  Rosenbrock's 
method  can  be  used  for  both  constrained  and  unconstrained  searches, 
whereas  Powell's  method  is  only  applicable  for  unconstrained  searches. 

Determination  of  the  transfer  function  from  frequency  response 
data  has  received  wide  attention  in  the  literature  (5,8,22,24,28,36,37, 
66,67,70,71).  One  of  the  most  complete  accounts  to  date  is  contained 
in  the  book  by  Chen  and  Haas  (23).  Some  of  the  methods  developed  used 
a  graphical  procedure  (5,28,66)  to  determine  the  transfer  function  co¬ 
efficients.  Graphical  methods  have  a  distinct  advantage  in  that  the 
calculations  can  be  carried  out  by  hand  with  a  reasonable  time  require- 
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merit,  though  they  have  certain  deficiencies  regarding  accuracy  and 
general  appl i cabi 1 i ty .  For  complicated  cases  or  whenever  a  large 
amount  of  data  is  involved,  analytical  methods  must  be  used.  Most  of 
these  methods  used  least  squares  fitting  techniques  to  approximate 
the  frequency  curves  (8,24,36,37,67,72).  Use  of  a  digital  computer 
is  foreseen  for  most  cases. 

4.3  Theory 

The  transfer  function  G(s)  for  a  time  invariant,  linear 
system  incorporating  no  pure  time  delay  is  usually  expressed  by  a 
ratio  of  two  polynomials  in  s,  that  is: 


G(s) 


b  sm  +  b  1 sm  ^  +  . . c  +  bn s  +  bn 
_m _ oh _ 1 _ 0 

ansn  +  an_-|Sn"^  +  .  o.  +  a-jS  +  aQ 


(4.3-la) 


where  m  and  n  are  the  degree  of  the  numerator  and  denominator  re¬ 
spectively  and  bk(k=0,l,2,...,m)  and  aj  (j=0,l  ,2, . . „ ,n)  are  real  con¬ 
stant  coefficients. 

In  the  frequency  domain,  the  transfer  function  G(s)  can  be 
expressed  as: 


2  2 

(bn-b0or+. . .)  +  ja>(b,-b~u>  +. . .) 

G(jco)  -  °  2  2-  -  - - ,  ,  1  3  2 - -  (4.3-lb) 

(aQ-ag^J  "^ » . . )  jco  ( a  -j  —  ®  °  ° ) 


In  practice,  for  most  cases,  it  is  possible  to  represent  any 
system  by  simple,  low  order  transfer  functions  with  or  without  time  de¬ 
lays  such  as  first,  second  or  third  order  transfer  functions. 
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For  a  first  order  system,  the  representation  is: 


(4.3-2) 


For  a  second  order  system,  the  representation  is: 


(4.3-3) 


Similarly,  for  a  third  order  system, 


(4.3-4) 


where  K  =  the  system  gain 


ip  =  the  time  delay  in  the  system 
Tl,T2sT3  =  s^stem  tlme  constant  (s) 

The  general  strategy  to  be  used  in  arriving  at  an  approxi¬ 
mate  transfer  function  from  experimental  data  is  as  follows: 

(i)  Assume  that  the  system  can  be  adequately  represented  by  a 
simple  model  with  a  transfer  function  given  by  equation  (4.3-2), 
(4.3-3)  or  (4.3-4).  In  the  general  case  where  equation  (4.3-la)  is 
used  to  represent  the  dynamics  of  the  system,  the  degree  of  the 
numerator  and  denominator  must  be  assumed. 

(ii)  Determine  the  time  delay  in  the  system,  if  there  is  any. 

(iii)  Curve  fit  the  time-domain  data  or  the  frequency-domain 
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data  using  appropriate  search  technique.  Frequency  response  data  can 
be  obtained  either  by  pulse  testing  or  direct  frequency  response  experi¬ 
mentation. 

( i v )  Perform  a  statistical  test  to  obtain  the  simplest  transfer 
function  which  adequately  represents  the  system. 

4.3.1  Determination  of  the  System  Time  Delay 

Theoretically ,  the  time  delay  in  any  system  can  be  deter¬ 
mined  simply  by  shifting  the  zero-time  to  the  point  of  the  first  ob¬ 
servable  deviation  in  the  output  signal.  The  magnitude  of  this 
shifting  determines  td  as  defined  in  equations  (4.3-2),  (4.3-3)  and 
(4.3-4).  In  practice,  due  the  noise  present  in  actual  processes,  it 
is  not  always  possible  to  determine  with  reasonable  accuracy  the  time 
of  the  first  observable  deviation  in  the  output  signal.  To  overcome 
this  problem,  Oldenbourg  and  Sartorius  (50)  developed  a  simple  method 
which  can  be  used  to  determine  the  time  delay  in  any  actual  process 
from  its  transient  response.  The  method  is  illustrated  by  Figure 
4.3-1.  The  procedure  is  outlined  as  follows: 

(i)  Draw  a  tangent  to  the  transient  response  at  the  inflection 
point  I.  The  intersection  of  this  tangent  and  the  horizontal  axis  of 
the  curve  occurs  at  the  point  R.  At  this  point,  the  value  of  the 
actual  transient  response  is  PR. 

(ii)  Point  Q  which  has  the  value  QR  =  2.718  x  PR  is  located  on 
the  graph. 

(iii)  A  line  parallel  to  the  tangent  through  the  point  Q  locates 
the  equivalent  dead  time  of  the  process. 
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Figure  4.3-1  Determination  of  the  Time  Delay  from  the  Transient  Response 
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4.3.2  Curve  Fitting  Techniques 

A.  Outline  of  the  procedure  to  determine  an  approximate  transfer 

function  from  time-domain  data. 

If  a  system  which  can  be  adequately  represented  by  simple 
transfer  function  such  as  first,  second  or  third  order,  is  excited 
with  a  step  function  or  with  a  pulse  of  known  functional  form,  then 
it  is  possible  to  derive  an  analytical  expression  of  the  transient 
response  y(jD,t)  for  the  system  in  terms  of  the  unknown  parameters  p_ 
of  the  assumed  transfer  function  (i.e.  the  gain  and  the  time  constant(s)) 
At  any  specific  time  t,  the  error  e^  (jd.)  between  the  ideal  response 
y.  (p_)  and  the  experimental  data  u^  is: 


ei  (jl)  =  y^E.)  -  ui  (4.3-5) 

In  order  to  establish  the  best  set  of  parameters  £  of  the 
system  transfer  function,  it  is  logical  to  seek  a  minimum  of  the  function 

F(e)  =  I  (Yi (fi)  -  ui)2  (4.3-6) 

1=1 

where  i  =  l,2,...,n  ;  n  =  number  of  data  points. 

One  of  the  most  convenient  methods  of  determining  the  least 
value  of  the  function  F(^)  in  equation  (4.3-6)  is  the  one  developed 
by  Rosenbrock.  It  has  the  advantages  that  the  knowledge  of  the  partial 
derivatives  of  the  function  F(£)  are  not  needed  and  a  set  of  constraints 
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of  the  parameters  to  be  optimized  can  be  inserted  in  the  calculations 
without  any  difficulty.  Constraints  are  necessary  to  ensure  that  all 
physically  unrealizable  solutions  are  eliminated. 

The  Rosenbrock  method  is  essentially  an  extension  of  the 
hill-climbing  method.  To  determine  the  least  value  of  equation  (4.3-6), 
successive  evaluations  of  the  values  of  F(jd)  are  compared  and  a  set  of 
rules  defines  the  action  to  be  taken  according  to  the  outcome  of  the 
comparison.  The  two  difficulties  which  have  to  be  met  in  evaluating 
successive  values  of  F(jd_),  i.e.  F(p^)  and  F(jd^)  =  F(jd^  +£^) 
are: 


(i)  Determination  of  the  directionsof 
(ii)  Determination  of  the  lengths  of 

To  overcome  these  difficulties,  Rosenbrock  suggested  the 
following  procedure, 

A  set  of  £  orthogonal  unit  vectors  v_-j ,  w,,  . ..,  v^  and  a 
set  of  step  lengths  d] ,  d2,  ...,  d^  are  stored  in  the  computer  (£  is 
the  number  of  unknown  parameters  to  be  optimized).  The  successive 
changes  in  parameters  £_  are  d-^  ,  d^,  ..  =  »  d^.  After  each  evalu¬ 
ation  of  the  function  F(£),  the  new  value  F (]>+£)  is  compared  with  the 
best  value  FQ  so  far  obtained.  If  F (fi+£) <FQ •  then  the  solution  is 
moved  forward  to  £  +  £  and  the  value  of  FQ  is  replaced  by  F(jd+£).  On 
the  other  hand,  if  F(e+£)>Fq,  the  current  set  of  parameters  jd.  and  the 
value  of  Fq  are  maintained  at  their  original  values.  After  each  evalu¬ 
ation  of  F (j2_) ,  the  corresponding  step  lengths  <d  (so  that  d_  =  (d-j  ,d2> . . .  ,d£) ) 
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are  modified.  If  the  evaluation  is  successful,  the  values  of  d_  are 
trebled.  If  it  was  unsuccessful,  cMs  multiplied  by  -1/2.  These 
values,  3  and  -  1/2,  were  selected  by  Rosenbrock,  on  the  basis  of 
computational  work,  as  those  that  give  good  efficiency  in  a  moderately 
difficult  problem  (63).  The  search  is  made  along  one  direction  at  a 
time  and  the  procedure  is  continued  until  a  successful  step  has  been 
made  in  the  direction  of  v^,  followed  by  a  failure  for  every  direction 
k.  Thus,  the  procedure  is  not  interrupted  until  each  step  length  d^ 
has  first  adjusted  itself  to  the  correct  magnitude.  When  this  happens, 
the  procedure  is  interrupted  and  the  axes  v^  are  replaced  by  a  new  set 
of  orthogonal  unit  vectors  obtained  by  using  the  Gram-Schmidt  ortho¬ 
gonal  ization  procedure  (77). 

For  further  details  of  this  method,  the  book  by  Rosenbrock 
and  Storey  (65)  should  be  consulted. 

To  insert  the  limits  on  the  parameters  to  be  optimized,  it 
is  sufficient  to  ensure  that  the  constraints  are  not  transgressed.  In¬ 
deed,  if  a  parameter  jp^  is  restricted  to  lie  between  a  lower  limit  a 
and  an  upper  limit  b,  and  at  any  stage  of  the  iteration  procedure,  the 
Rosenbrock  method  calls  for  pk  <  a  or  pk  >  b,  then  pk  will  be  temporarily 
fixed  at  either  a  or  b  and  only  the  remaining  parameters  are  varied. 

A  computer  program  was  written  to  determine  approximate 
transfer  functions  from  time-domain  data  by  the  Rosenbrock  search 
technique.  Program  listings  appear  in  Appendix  B. 
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B .  Outline  of  the  methods  used  to  determine  an  approximate  transfer 

function  from  frequency -domai n  data. 

Fitting  a  transfer  function  to  time-domain  data  suffers  from 
the  disadvantage  that  the  procedure  is  only  applicable  when  the  tran¬ 
sient  response  of  the  system  can  be  described  adequately  by  an  analyti¬ 
cal  expression  This  condition  is  satisfied  only  when  the  transfer 
function  is  simple  and  the  excitation  applied  to  the  system  has  a  known 
functional  form.  The  latter  condition  can  not  generally  be  satisfied 
in  practice  because  of  the  difficulties  in  producing  exact  forcing 
functions,  Therefore,  sometimes,  it  is  necessary  to  be  able  to  deter¬ 
mine  the  transfer  function  from  frequency  response  data.  The  present 
investigation  is  restricted  only  to  the  methods  which  can  be  easily 
programmed  on  a  digital  computer  They  are  the  methods  of  Bailey  and 
Law  (8),  of  Chen  and  Philip  (22),  of  Levy  (37)  and  of  Staffin  and 
Staffin  (70).  Also  investigated  here  is  the  determination  of  transfer 
function  coefficients  using  RosenbrockJs  search  technique  in  the  frequency 
domain.  Computer  programs  were  written  for  each  of  these  methods. 

Program  listings  appear  in  Appendix  B. 
a.  Bailey  and  Law  Technique 

The  Bailey  and  Law  method  is  a  regression  technique  for  fitting 
the  data  by  an  equation  of  the  form. 
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where  y..  =  the  dependent  variable 

ik.  =  the  independent  variable 

J  * 


Pk 

=  the  unknown 

parameters  to  be  optimized 

j 

*  1  «2 )  •  •  o  j  r 

r  =  number  of  independent  variables 

k 

Q 
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• 

ws 

CM 
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It 

£  =  number  of  unknown  parameters 

i 

1  j  2  j « e » j  n 

n  =  number  of  data  points 

The  method  of  least  squares  fitting  requires  that  in  order 
to  obtain  a  set  of  parameters  pk  in  equation  (4.3-7)  which  best  fits 
the  experimental  data,  it  is  proper  to  seek  an  unrestricted  minimum 
of  the  following  expression: 


n 

i 

i=i 


(yrV 


(4.3-8) 


where  i  =  l,2,.,*,n  n  =  number  of  data  points 

=  value  of  the  model  determined  by  equation  (4.3-7) 
<J>.  =  experimental  data 


If  the  function,  f,  in  equation  (4.3-7)  is  non-linear  in  the 
parameters  p^,  minimization  of  equation  (4.3-8)  is  a  non-linear  problem. 
Therefore,  one  of  the  possible  means  for  its  solution  is  linearization 
by  means  of  a  Taylor  series  expansion0  For  the  (j+l)th  iteration,  the 
following  expression  is  obtained  by  truncating  all  but  the  linear 
terms : 
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where  superscript  (j)  refers  to  the  iteration  j  and 


Ap 


k 


(4,3-10) 


To  seek  an  unrestricted  minimum  of  equation  (4,3-8),  the 
following  equation  must  be  satisfied: 


n 

^  l  Si 
1  =  1 


=  0 


(4.3-11) 


The  fitting  procedure,  then,  involves  solving  £  simultaneous 
linear  equations  which  can  be  written  in  abbreviated  matrix  form  as: 


Z  x  B  =  C 


or  more  expl i ci tly , 
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E  =  l  (summation  over  all  data  points) 
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(4.3-12) 
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(j) 


>(j) 


C)  f  (  j  ) 

=  [%] 

n  (j) 

=  I  [S^Z  )  ] 
i=l  i 


Ap^  is  given  by  equation  (4.3-10) 

Z  =  the  matrix  of  Z^'s  in  equation  (4.3-12) 

B.  =  the  vector  of  Apk's  in  equation  (4.3-12) 

C  =  the  vector  of  C^'s  in  equation  (4.3-12) 

From  equation  (4.3-12),  B_  can  be  calculated  by: 


B=Z_1xC  (4,3-14) 

The  values  of  Apk  in  the  vector  ^  will  be  found  by  solving 
equation  (4.3-14)  and  new  values  of  pk^'+^  for  the  next  iteration 
(j+1)  will  be  computed  from  equation  (4.3-10).  The  procedure  is  re¬ 
peated  until  the  corrections  Apk  become  negligibly  small. 

However  the  above  procedure  will  normally  lead  to  a  divergence 
unless  the  original  starting  values  of  pk  are  very  nearly  equal  to  the 
correct  values.  To  overcome  this  problem,  Bailey  and  Law  suggested 
the  following  modifications  of  the  above  technique  which  would  ensure 
convergence  if  there  is  a  unique  solution: 

(i)  Introduce  a  new  variable  Dj  which  is  defined  by  the  following 
equation: 

D  =  I  (&Pk)(J)  Ck(j) 

1  k=l  K  K 


(4.3-15) 
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Dy  must  be  positive  if  the  direction  is  toward  a  minimum.  If  Dy  is 
negative,  the  signs  of  all  Apk  must  be  changed. 

(ii)  Define 


AS 


2 

a 


(j+1) 


(4.3-16) 


ASa  must  be  positive  if  the  iteration  procedure  is  converging.  If 
2 

ASq  is  negative,  then  the  present  values  of  the  corrections  Apk  must 
be  restricted  according  to  the  relation: 


Ap^( J+1 )  =  a  .  Apk^ 


(4.3-17) 


where  a  is  the  fraction  that  the  changes  are  restricted. 

o 

(iii)  Even  if  AS^  is  positive,  the  convergence  might  be  relatively 

a 

slow.  The  speed  of  convergence  can  be  improved  by  using  the  following 
criterion : 


AS  2  -  3DT(2a-a2)  >  0  (4.3-18) 

a  i 

Bailey  and  Law  suggested  that  values  of  a  =  0,5  and  3  =  0.25 
are  generally  suitable  for  maximum  progress  toward  the  minimum. 

An  examination  of  the  above  procedure  suggests  that  the 
Bailey  and  Law  technique  can  be  applied  to  fitting  the  transfer  function 
forms  of  equations  (4.3-2),  (4,3-3)  and  (4.3-4)  since  the  magnitude 
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ratios  and  the  phase  angles  corresponding  to  these  transfer  functions 
can  be  described  by  analytical  expressions  of  the  form  of  equation 
(4c  3-7) . 

As  an  illustration,  for  a  second  order  transfer  function 
with  unit  gain  and  no  time  delay;  the  magnitude  ratio  can  be  ex¬ 
pressed  as: 


[(t^2+1)(t|o2+1)] 


-1/2 


(4.3-19) 


Then  be  letting 


The  following  expressions  are  obtained: 

-1/2 

y,  =  C(p1u12+i)(p2u12+i)] 

h--i  kSO  *i3 

Z2  =  -l(Ui2+plUl4)  yi3 


(4.3-20) 


(4.3-21) 


(4.3-22) 


■ 


50 


With  these  equations,  it  is  then  possible  to  determine  for 
the  values  of  ,  p2  by  the  Bailey  and  Law  technique. 

The  corresponding  equations  for  other  representations  may  be 
obtained  in  a  similar  manner. 

b„  Chen  and  Philip  Technique 

To  determine  the  transfer  function  using  the  Chen  and  Philip 
method,  it  is  necessary  to  express  the  assumed  transfer  function  in 
the  form: 


G  ( s )  aq  +  Vis)  +  Ml+s^  + 


+  a  (—) 
Vl+sj 


n 


(4.3-23) 


The  basis  of  this  method  is  the  determination  of  the  coeffi¬ 
cients  Aos  A] »  A2*  ,c,>  V  To  determine  the  values  °f  Ak>  the  follow¬ 
ing  technique  was  developed  by  Chen  and  Philip. 

With  the  use  of  a  bilinear  transformation: 


1-s, 
1+s  ’ 


S-^jO) 


(4.3-24) 


G(s)  can  be  transformed  from  the  s  domain  to  the  6  domain. 

Indeed, 


G  ( 0)  =  Aq  +  A^e"'10  +  A2e‘j20  +  ...  +  Ane'jn6 


(4.3-25) 


Since  G ( 0)  is  a  complex  function,  it  can  be  separated  into 
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its  real  and  imaginary  parts: 


G(6)  -  R(6)  +  j  I 


(4.3-26) 


Equating  the  R(e)  with  the  real  part  of  the  right-hand  side 
of  equation  (4.3-25)  yields: 


=  Aq  +  A^cos0  +  A2COS20  +  ...  +  A^cosn© 


(4.3-27) 


If  the  values  of  R( 0)  are  available,  the  values  of  Ak  can 
be  determined  by  a  Fourier  series  expansion. 


2tt 


A.  =  - 


]  f 

TT 


R ( 0)  cos  k©  d0 


(4.3-28) 


Since  an  analytical  expression  of  R ( ©)  is  not  normally 
available,  the  integral  in  equation  (4.3-28)  must  be  computed  numerically, 
The  values  of  R ( 0)  can  be  determined  from  the  real  part  function  R(oo) 
of  the  transfer  function  G(jw)  from  the  frequency  response  data  by 
using  the  following  transformation 


0=2  tan"1  w 


(4.3-29) 


Once  the  values  of  A^  are  determined  from  equation  (4.3-28) 
they  are  substituted  back  into  the  original  transfer  function  (4.3-23). 
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C.  Levy  Technique 

Levy's  method  of  fitting  transfer  function  to  frequency  re¬ 
sponse  data  is  an  extension  of  the  least  squares  fitting  process.  As¬ 
suming  that  the  frequency  response  data  for  any  system  can  be  repre¬ 
sented  by  equation  (4.3-lb),  Levy  first  separated  the  numerator  and 
denominator  into  real  and  imaginary  parts: 


(4.3-30) 


N(u>) 


"  W 

Suppose  further  the  existence  of  a  function  F(ju)  that  re- 
presents  exactly  the  data  points  of  the  experimental  frequency  curve, 
F(joo)  will  also  have  real  and  imaginary  parts  as  given  by: 


(4.3-31 ) 


F(joj)  =  R(w)  +  j  1(03) 


At  any  specific  value  of  frequency  u>. ,  the  error  in  fitting 

is  then, 


e(a).j)  =  F ( jo). )  -  G( joi^ ) 

N(a>.) 


(4.3-32a) 


=  F(JV  ‘  dT^tj 


( 4 . 3- 32b ) 
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Multiplication  of  both  sides  of  equation  (4.3-32b)  by 
D(w.)  gives: 


e(o)i)  D(o3.)  =  F ( joo1 )  D(o3.)  -  N(coi ) 


(4,3-33) 


Equation  (4.3-33)  may  then  be  separated  into  real  and 
imaginary  parts  as 


e^)  D(a)^ )  -  A((jo.)  +  jB(on ) 


(4,3-34) 


and  it  follows  that  the  magnitude  of  this  expression  is 


D(o>.)  e(co.)|  =  / ;a(o >.)]2  +  [Bt^.j]2 


(4.3-35) 


Levy's  method  consists  of  defining  a  function  E  as  defined 


by: 


E=  l  [A(u. )]2  +  [B(u. )]2  (4.3-36) 

i  =  l  1  1 

where  n  is  the  number  of  data  points „ 

The  unknown  coefficients  a^  and  b^  in  equation  (4, 3-lb)  are 

now  evaluated  by  minimizing  E.  For  least  squares  fitting,  it  is  necessary 

to  minimize  E  by  setting  the  partial  derivatives  of  E  with  respect  to 

each  of  the  coefficients  a.  and  b,  equal  to  zero.  This  results  in  a 
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set  of  linear  simultaneous  equations  which  may  be  solved  for  the  de¬ 
sired  coefficients.  By  some  mathematical  transformations,  Levy  arrived 
at  the  following  set  of  linear  equations,  by  assuming  that  =  1 . 
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l  o>  i  J  ( i  i  +R-j  ) 


1  =  1 


(4.3-38) 


The  set  of  linear  equations  (4.3-37)  can  be  expressed  in 
matrix  form  as: 


M  x  N  =  C 


(4c  3-39) 


where 


56 


Ao 

0 

CM 

1 

0 

•  0  c 

Ti 

S2 

-T3 

oo 

1 

T  ^  0*0 

0 

A2 

0 

~A4 

0  a  o  e 

"S2 

T3 

S4 

-T5 

-S 

vy  /•  roe 

6 

A2 

0 

-a4 

0 

A6  #*e 

T3 

S4 

-T5 

"S6 

Ty  «  o  o 

0 

e 

A4 

e 

0 

• 

6 

© 

0  o  o  o 

o 

-S4 

a 

T5 

e 

S6 

e 

”T7 

0 

-S 

Og  •  ©  © 

a 

e 

o 

Ti 

a 

0 

”S2 

r 

e 

-T3 

e 

o 

S4 

e 

r 

Tr  e  o  o 

0 

c 

0 

U2 

0 

© 

0 

« 

o 

-U4 

o 

o 

0 

o 

• 

U/>  a  o  a 
6 

CXI 

l/) 

T3 

-S4 

”T5 

s 

W  /«  CPC 

6 

0 

U4 

0 

-U6 

0  0  c  c 

T3 

"S4 

-T5 

S6 

T  y  o  c  © 

U4 

0 

-U6 

0 

Ug  •  e  * 

S4 

T5 

”S6 

T7 

S 

^  g  O  C  0 

0 

U6 

0 

-U8 

0  •  o  0 

c 

e 

© 

« 

0 

e 

o 

C 

c 

e 

e 

c 

a 

O 

c 

o 

c 

O 

c 

a 

© 

57 


The  problem  of  evaluating  the  unknown  coefficients  in  a 
transfer  function  is  now  reduced  to  the  numerical  solution  of  certain 
determinants, 

dc  Staffin  and  Staffin  Technique 

The  procedure  proposed  by  Staffin  and  Staffin  (70)  consists 
of  matching  the  gain  and  phase  angle  curves  or  the  gain  curve  only  of 
the  frequency  response  of  a  system  by  the  transfer  function  described 
by  equation  (4.3-la),  First,  it  is  necessary  to  group  the  odd  and 
even  powers  of  oo  in  equation  (4,3-lb). 


G(jco) 


*  •••)  *  +  ...) 

(an'an-2“2  +  •")  +j(an-l0J"an-30j3  +  ...) 


( 4  o  3- 40a) 


Ne(o»)  +  J  N0(eo) 
De(io)  +  j  DQ(ai) 


(4.3-40b) 


where  e  and  0  refer  to  the  terms  in  even  and  odd  powers  of  co  respectively, 
G(jw)  can  be  expressed  as  the  sum  of  a  real  and  an  imaginary 

part  as 


G(jto)  =  R(to)  +  j  I  (to)  (4.3-41) 

For  gain  and  phase  matching,  substitution  of  equation 
(4.3-41)  into  equation  (4.3-40b)  yields 

Ne(oo)  +  jNg(ca)  =  R(a>)  De(w)  -  I  (co)  Dq(u>) 

+  j[R(to)  Dg (to)  +  I  (to)  De(to)]  (4.3-42) 


'  ,  i  T 
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Equating  the  real  and  imaginary  parts  in  equation  (4.3-42) 

yields 


Ne(w)  =  R(oo)  De(oj)  -  I  (go)  Dq(oo)  (4.3-43a) 

N0(w)  =  R(a>)  D0(oj)  +  I(w)  De(u))  (4.3-43b) 

If  the  frequency  response  data  are  given  in  terms  of  both 
the  magnitude  ratio  and  the  phase  angle,  the  real  and  imaginary  parts 
of  G(jw)  can  be  computedo 

At  a  given  frequency  oj.  ,  it  is  possible  to  derive  the  follow¬ 
ing  expressions  using  the  definitions  of  N  ,  NQ,  D  ,  DQ  from  equations 
(4c3-40a)  and  (4,3-40b). 

Ri(an"an-2wi2  +  00^"  !i  ^ an-l ^i “an-3coi  +  °°^ 

=  ^bm+bm-2wi2  +  (4.3-44) 

Ri  (an-iaji“an-3a3i'3  +coo^+  !i  ^an“an-2wi  +,0°^ 

=  (bm_-jw1.+bm_3a)1.3  +...)  (4.3-45) 

where  R.  and  I..  are  the  real  and  imaginary  parts  of  G ( joo^ )  respectively. 
In  equations  (4.3-44)  and  (4.3-45),  there  are  (n  +  1 )  aj  and 


. 
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(m+l )  unknowns,  thus  taking  (n+m+2)/2  simultaneous  equations  which 

can  be  solved  for  the  values  of  a.  and  b,  . 

J  K 

For  gain  matching  only,  Staffin  and  Staff in  recommended 
the  following  procedure. 

Taking  the  magnitude  of  G(jco)  in  equation  (4,3-40b)  yields 


G(ju)) 


2 


[NeM]2  +  [N0(o.)]2 
[D0(co)]2  +  [Dq(u)]2 


(4.3-46) 


| G ( jco)  |  is  a  ratio  of  two  polynomials  of  even  powers  of  w 
which  can  be  written  as: 


3q+(3-|00^  +cc.+3^a)^m 

.  “  Zn 

an+an  a)  +  o  o  .  +a„a) 

U  I  n 


(4.3-47) 


Values  of  a  and  3  can  be  determined  from  G(jw)  by  choosing 
(n+m+2)  values  of  w.  and  solving  the  resulting  simultaneous  equations. 

Once  the  values  of  a  and  3  are  obtained,  the  values  of  a^  and  b^  can  be 
computed. 

e.  Rosenbrock  Method  in  the  Frequency-Domain 

To  demonstrate  the  usefulness  of  Rosenbrock 's  search  technique, 
this  method  will  be  used  to  fit  the  transfer  function  of  the  form  of 
equation  (4.3-la)  to  frequency  response  data. 

To  fit  the  amplitude  ratio  curve  or  the  phase  angle  curve  of 
the  frequency  response,  it  is  necessary  to  derive  an  analytical  expression 
of  the  magnitude  ratio  or  the  phase  angle  in  function  of  the  frequency. 
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At  any  specific  frequency  w.. ,  the  error  between  the  model  and  the  ex¬ 
perimental  data  is: 


ei (r)  =  -  <j >(a>.) 


(4.3-48) 


where  y(p_,a).j)  is  the  value  of  the  model  calculated  from  the  mathe¬ 
matical  expression  of  the  magnitude  ratio  or  the  phase  angle  at  the 
frequency  u>. ,  £_  is  the  set  of  parameters  to  be  determined  and  <j>(oj - ) 
is  the  experimental  data  at  the  frequency  w.  „ 

To  curve  fit  the  frequency  response,  it  is  proper  to  seek 
the  least  value  of  the  equation: 

F  =  l  (y(l l.uj  -  *(co.))2  (4.3-49) 

1  =  1  1 

The  minimum  of  the  function  F  can  now  be  obtained  using  the 
Rosenbrock  search  technique  described  in  part  A  of  section  4.3-2. 

4.3.3  Criteria  for  Selecting  the  Simplest  Adequate  Representation 

In  all  the  methods  of  determining  the  approximate  transfer 
function  considered  so  far,  either  the  degree  of  the  numerator  and  the 
denominator  of  equation  (4,3-la)  (m  and  n)  or  the  form  of  the  transfer 
function  (first,  second  or  third  order)  must  be  estimated. 

If  the  equation  (4.3-la)  was  chosen  to  fit  the  experimental 
data,  it  is  preferable  to  start  with  small  values  of  m  and  n„  In  the 
case  where  the  match  is  not  satisfactory,  the  estimated  values  of  m 
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and  n  must  be  increased  until  a  satisfactory  match  is  obtained.  If 
the  values  of  m  and  n  chosen  were  too  high,  some  poles  and  zeros  found 
by  curve  fitting  are  far  from  the  other  poles  and  zeros  so  they  are 
considered  to  be  spurious  and  can  normally  be  dropped. 

Since  in  practice,  most  systems  can  be  adequately  repre¬ 
sented  by  a  first,  a  second  or  a  third  order  transfer  function,  the 
problem  then  arises  is  as  how  to  select  the  simplest  transfer  function 
which  still  can  adequately  represent  the  dynamics  of  the  system. 

Bailey  and  Law  (8)  proposed  a  simple  method  which  can  be  used  as  an 
answer  to  this  problem.  The  method  will  be  outlined  as  follows. 

Assuming  that  any  errors  in  the  data  are  insignificant 

when  compared  to  the  errors  due  to  lack  of  fit  between  the  model  and 

the  data.  The  residual  sum  of  squares  is  a  measure  of  the  errors  due 
to  lack  of  fit.  The  sum  of  squares  for  assumed  first,  second  and 
third  order  systems  are  given  by  the  following  equations: 

si2  =  J  (y-irV2  (4-3'50) 

1  —  1 

h2- 1  <y2iV  (4-3-51) 

s32  -  j,  ^r-M2  (4-3-52) 

where  y^  =  model  for  first  order  system  representation 
y  .  =  model  for  second  order  system  representation 


-  ••  3  n  i3d  ^  ms  r  d<n  q 
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-  model  for  third  order  system  representation 

2 

S-j  =  residual  sum  of  squares  for  first  order  system 
representation 

2 

=  residual  sum  of  squares  for  second  order  system 
representation 

2 

Sg  =  residual  sum  of  squares  for  third  order  system 
representation 
<f>.  =  experimental  data 

Bailey  and  Law  then  selected  the  model  on  the  basis  of  a 

2  2  2 

statistical  test  performed  on  S-j  ,  S2  and  . 

Since  all  residual  sums  of  squares  are  calculated  from  the 
same  number  of  data  points,  the  ratios  [S-j  /S^  ]  and  [S^  /S^  ]  will 
be  distributed  as  the  F  distribution  with  (n-l,n-3)  and  (n-2,n-3) 
degrees  of  freedom  (n  is  the  total  number  of  data  points).  The  follow¬ 
ing  criteria  were  used  to  select  the  simplest  adequate  representation: 


(i) 

If  [S22/S32]  >  F1.a(n-2,n-3): 

use  third  order  system 

representation 

(ii) 

If  [S22/S32]  <  F-j _a( n-2 ,n-3) : 

make  the  following  test: 

- 

If  [S12/S32]  >  F1_a(n-l,n-3): 

use  second  order  system 

representation 

- 

If  [S,2/S32]  <  F1_a(n-l,n-3): 

use  first  order  system 

representation 


where  a  is  the  level  of  significance  of  the  F  distribution  (a  was  taken 
as  equal  to  0.01  by  Bailey  and  Law). 

For  a  detailed  discussion  of  the  statistical  reasoning  in- 
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volved  in  the  above  criteria,  reference  (18)  should  be  consulted. 

Although  this  method  was  used  originally  by  Bailey  and  Law 
to  find  the  simplest  adequate  representation  of  frequency  response 
data,  it  has  also  been  used  in  this  study  to  select  the  simplest 
transfer  function  representation  of  time-domain  data. 

4.4  Illustrative  Examples  Used  to  Evaluate  the  Different  Methods  of 

Determining  Approximate  Transfer  Functions 

To  compare  various  methods  of  determining  approximate 
system  transfer  functions,  computations  were  carried  out  using  data 
from  two  known  second  order  transfer  functions. 

The  transfer  functions  selected  were: 

Example  1 


G(s) 


_ 5JD _ 

(9.0s+l ) (1 O.Os+1 ) 


Example  2 


p /  \  _  5.0 

"  (0.5s+l )  (lO.Os+TJT 

To  obtain  the  data  used  for  curve  fitting,  the  time-domain 
data  were  generated  from  the  analytical  expressionsas  given  by  the 
above  transfer  functions  to  a  rectangular  pulse  forcing  function  of 
known  magnitude  and  duration. 

The  frequency  response  data  were  obtained  by  computing  the 


. 
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magnitude  ratios  and  the  phase  angles  at  various  frequencies  using 
their  known  mathematical  expressions  corresponding  to  the  above  transfer 
functions . 

Table  4.4-1  summarizes  the  parameters  of  the  transfer  function 
in  Example  1  determined  by  different  methods  and  Table  4.4-2  contains 
the  results  for  Example  2. 

4.5  Discussion 

Results  from  using  the  different  methods  of  determining  an 
approximate  transfer  function  revealed  the  following  points: 

(i)  Rosenbrock  method  -r  One  of  the  difficulties  with  the  Rosen- 
brock  search  technique  is  the  lack  of  a  satisfactory  criterion  to 
terminate  the  search.  Indeed,  as  the  case  with  any  hi 1 1 -cl imbing 
method,  it  is  difficult  to  know  when  the  optimum  is  reached.  Rosen¬ 
brock  suggested  that  it  is  preferable  to  stop  the  search  after  a  pre¬ 
determined  number  of  steps,  and  a  rough  estimation  is  that  about  50  x  l 
evaluations  of  the  function  F(jd_)  to  be  optimized  will  often  suffice 
(A  is  the  number  of  parameters  to  be  determined).  This  might  lead  to 
inefficiency  in  simple  problems  where  only  a  small  number  of  iterations 
is  required  to  find  the  desired  solution.  For  some  particular  problems, 
this  estimated  number  of  50  x  £  is  not  enough  since  progress  to  the 
optimum  may  be  slow  and  furthermore  the  optimum  values  may  not  have  been 
established.  For  these  difficult  problems,  it  is  desirable  to  print 
out  all  the  step  lengths  d. ,  the  direction  v.. ,  and  the  values  of  the 
function  F(jd_).  If  inspection  shows  that  a  minimum  has  not  been  reached, 
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re-start  the  search  using  as  initial  approximations  of  the  variables 
£.»  the  best  values  of  the  parameters  determined  by  the  previous  research. 

In  general,  when  a  very  large  number  of  data  points  is  in¬ 
volved,  the  evaluation  of  the  function  F(gJ  is  relatively  slow.  The 
computer  time  will  then  depend  much  less  on  the  search  technique  and 
much  more  on  the  number  of  evaluations  of  F(jd_). 

(ii)  Bailey  and  Law  method  t  With  this  method,  it  is  possible  to 
curve  fit  the  transfer  function  using  only  amplitude  ratio  data.  This 
is  particularly  desirable  since  phase  angle  experimental  data  are 
unreliable  at  high  frequencies.  The  requirement  of  the  partial 
derivatives  of  the  function  to  be  optimized  would  limit  this  method, 
for  all  practical  purposes,  to  simple  transfer  functions  only.  The 
Bailey  and  Law  technique  gives  fast  convergence,  but  sometimes,  it 
might  lead  to  undesirable  solutions  of  the  parameters  to  be  determined. 

(iii)  Chen  and  Philip  method  *  This  method  has  the  advantages  of 
eliminating  an  early  decision  as  to  the  form  of  the  transfer  function 
and  the  procedure  is  easily  programmed  on  a  digital  computer.  However, 
determination  of  an  approximate  transfer  function  by  this  method  is 
impracticable  since: 

-  To  evaluate  the  Fourier  coefficients  in  equation  (4.3-28), 
the  data  of  R( e)  should  be  available  for  the  interval  0(0, 2tt)  for  the 
variable  e  would  correspond  to  the  interval  (0,°°)  for  the  frequency 
variable  w.  In  practice,  it  is  a  known  fact  that  frequency  response 
data,  especially  phase  angle  data  are  not  available,  or  highly  un¬ 
reliable. 
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-  For  transfer  functions  of  complicated  forms,  a  very  large 
number  of  Fourier  coefficients  Ak  would  need  to  be  evaluated  since 
there  is  not  a  sharp  drop-off  in  the  values  of  A^.  The  conversion 
from  the  variables  A^  in  equation  (4*3-25)  to  the  transfer  function 
coefficients  a^  and  b^  in  equation  (4*3-1  a)  might  be  a  troublesome 
problem. 

(iv)  Levy  method  *  The  most  desirable  feature  of  the  Levy  technique 
is  that  it  can  be  used  to  fit  transfer  functions  of  any  form  (the 
degree  of  the  numerator  m  and  denominator  n  in  equation  (4.3-la)  need 
to  be  specified) without  making  any  modification  in  the  computer  program. 
The  only  restriction  is  that  this  method  is  confined  to  systems  having 
a  finite  magnitude  at  zero  frequency*  For  the  determination  of  para¬ 
meters  in  simple  transfer  functions,  Levy's  method  is  somewhat  inferior 
to  Bailey  and  Law's  method  because  it  requires  phase  angle  experimental 
data,  and  furthermore,  it  gives  more  emphasis  in  the  curve  fitting 
scheme  to  data  at  high  frequencies,  which  might  lead  to  serious  errors 
since  frequency  response  data  are  generally  least  reliable  at  high 
frequencies . 

(v)  Staffin  and  Staffin  method  v  Since  only  a  very  limited  number 
of  data  points  can  be  utilized  to  determine  the  transfer  function  co¬ 
efficients,  it  is  suggested  that  the  data  be  taken  at  some  previously 
set  increment  of  frequency  or  completely  at  random  to  avoid  bias  in  the 
selection  of  data  points.  This  method  has  certain  deficiencies  regard¬ 
ing  accuracy  and  general  applicability  since  there  is  no  allowance 


for  measurement  error. 
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(vi)  Determination  of  an  approximate  transfer  function  from 
time-domain  data  versus  frequency-domain  data  t  It  might  appear  from 
the  results  given  by  Tables  4.4-1  and  4.4-2  that  the  determination  of 
the  transfer  function  from  frequency  response  data  particularly  by 
the  methods  of  Levy  (37)  and  Bailey  and  Law  (8)  gives  a  better  approxi¬ 
mation  of  the  true  transfer  function  coefficients  than  the  determi¬ 
nation  of  the  transfer  function  coefficients  from  time-domain  data 
by  Rosenbrock's  search  technique.  It  seems  likely  that  this  is  due 
to  the  fact  that  in  application  of  Rosenbrock's  method  in  the  time- 
domain,  the  initial  approximations  of  the  parameters  £  were  chosen 
to  be  far  away  from  the  correct  values  of  £  and  the  convergence  to¬ 
ward  the  absolute  minimum  of  F(£)  in  equation  (4.3-6)  is  relatively 
slow. 

It  should  be  remembered  however,  that  in  practice  it  is 
often  desirable  to  determine  the  transfer  function  directly  from 
time-domain  data  because  if  frequency  response  data  are  generated 
from  time-domain  data  through  data  reduction  techniques,  which  is  the 
case  of  pulse  testing,  possible  errors  would  result  in  the  frequency 
response  data.  Furthermore,  a  "best"  fit  in  the  frequency-domain 
does  not  necessarily  yield  a  "best"  fit  in  the  time-domain. 
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CHAPTER  V 

DISTILLATION  COLUMN  DYNAMICS 

5.1  Introduction 

Knowledge  of  the  dynamic  behavior  of  a  process  is  the  first 
step  in  the  development  of  improved  control  schemes .  A  rigorous  mathe¬ 
matical  model  of  the  distillation  column  although  possible,  is  not  of 
value  for  practical  purposes  because  even  the  use  of  approximate  models 
involves  the  solution  of  a  large  number  of  differential  equationSc  The 
computational  time  may  also  be  prohibitive  for  practical  utility.  For 
control  purposes,  at  least  when  conventional  three-mode  controllers 
are  considered,  only  a  simple  representation  which  adequately  describes 
the  dynamic  characteristics  of  the  column  is  neededo 

It  is  common  practice,  in  process  control,  to  develop  a  set 
of  transfer  functions  which  are  able  to  approximate  as  close  as  possible 
to  the  actual  process  responses.  Such  an  approach  can  be  extremely 
rewarding  as  long  as  the  perturbations  being  considered  are  small  com¬ 
pared  with  the  average  values  of  the  associated  independent  variables. 

This  chapter  summarizes  some  of  the  literature  concerned  with 
dynamic  models  of  distillation  columns  and  is  concluded  with  the  models 
used  in  this  study.  Models  were  developed  from  the  experimental  tran¬ 
sient  responses  of  two  pilot-scale  distillation  columns:  one  from  the 
University  of  Delaware  and  the  other  from  the  University  of  Alberta,  by 


■ 
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assuming  that  the  dynamic  responses  of  these  two  columns  can  be  repre¬ 
sented  by  first  or  second  order  plus  time  delay  transfer  functions, 
i  .e. 


70 


(5.1-1) 


or 


( t-j  s+1 )  (t^s+I  ) 


(5.1-2) 


5.2  Literature  Survey  on  Distillation  Column  Dynamics 

Considerable  information  has  appeared  in  the  recent  literature 
concerning  the  dynamic  behavior  of  distillation  columns,.  For  the 
simplest  cases,  along  with  many  restricting  assumptions,  the  resulting 
differential  equations  describing  the  transient  responses  of  distilla¬ 
tion  columns  can  be  solved  analytically  (47,78).  With  the  increased 
availability  of  analog  and  digital  computers,  it  has  become  possible 
to  solve  more  sophisticated  models,  however,  in  some  cases,  severe  as¬ 
sumptions  on  the  models  proposed.  This  is  particularly  true,  in  the 
cases  where  analog  computers  have  been  used;  linearization  of  the 
mathematical  models  is  employed  in  order  to  ease  the  very  high  require¬ 
ment  for  non-linear  components  on  analog  computers  (40,60,79,80).  Re¬ 
cently,  solutions  of  the  dynamic  models  of  distillation  columns  have 
been  carried  out  on  digital  computers  for  both  binary  (61,73)  and  multi - 
component  cases  (31,62).  Very  complete  surveys  which  cover  most  of  the 
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aspects  of  distillation  column  dynamics  can  be  found  in  the  literature 
(31,73,83).  Especially  noteworthy  is  a  comprehensive  review  by 
Williams  (83)  which  summarized  the  guidelines  to  be  used  in  formulating 
a  mathematical  model  for  a  plate  distillation  column  along  with  many 
common  simplifying  assumptions  used  to  reduce  the  enormous  complexity 
of  the  original  equations. 

Instead  of  theoretical  models,  empirical  models  in  the  form 
of  low  order  transfer  functions  have  been  proposed  by  several  authors 
(30,32,58,85),  Hoyt  and  Stanton  (32)  have  shown  that  the  response  of 
the  liquid  temperature  on  an  intermediate  tray  to  boil -up  rate  change  or 
feed  rate  change  can  be  approximated  by  a  first  order  plus  time  delay 
model.  This  type  of  model  has  been  used  by  Pacey  (52)  to  represent  the 
responses  of  top  and  bottom  product  compositions  for  feed  flow  rate  and 
reflux  flow  rate  variations.  A  second  order  plus  time  delay  model 
transfer  function  has  been  suggested  by  Rees  (58).  It  was  found  that 
the  accuracy  of  this  model  is  better  than  3  per  cent  for  small  pertur¬ 
bations  around  the  steady-state  operating  point.  First,  second  and 
higher  order  transfer  functions  have  been  used  by  Moczek  et  al  (49). 

They  proved  by  illustrative  examples  that  the  parameters  of  the  transfer 
functions  exhibited  a  strong  dependence  upon  the  magnitude  and  direc¬ 
tion  of  a  particular  upset,  due  to  the  non-linear  behavior  of  the 
column.  This  observation  was  also  confirmed  by  Pacey  (52),  Rees  (58) 
and  Bornard  et  al  (15) . 

Studies  dealing  with  experimental  testing  of  distillation 
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columns  to  determine  the  overall  transfer  functions  describing  the 
column  dynamics  originally  utilized  transient  and  frequency  response 
techniques „  However,  during  the  past  few  years,  most  studies  have  con¬ 
centrated  on  use  of  pulse  testing  method  (46,52),  since  pulses  are  in 
general  easy  to  produce  and  exact  pulse  shapes  are  not  critical.  Further¬ 
more,  the  system  is  upset  only  for  a  very  short  period  and  then  returns 
to  its  original  conditions.  Pulse  testing  often  reveals  information 
about  the  system  at  frequencies  which  are  unobtainable  by  direct  fre¬ 
quency  response  techniques,  Marino  and  Stutzman  (46)  showed  that  the 
pulse  testing  technique,  with  a  rectangular  pulse,  in  general  gives  good 
agreement  with  results  from  direct  frequency  response  testing  provided 
that  optimum  pulse  widths  are  used, 

5.3  Dynamic  Models  of  the  University  of  Delaware  Distillation  Column 

Extensive  experimental  studies  have  been  carried  out  on  a  ten- 
tray,  two-foot  diameter,  bubble  cap  distillation  column  at  the  University 
of  Delaware  by  Gerster  and  co-workers  (40,42,69),  The  column  was  opera¬ 
ted  with  the  acetone-benzene  system  with  feed  entering  the  column  as  a 
liquid  on  the  5th  tray  up  from  the  bottom,  A  complete  description  of 
the  column  along  with  all  pertinent  data  are  given  in  reference  (40). 
Although  the  column  contained  ten  intermediate  trays,  only  the  composi¬ 
tion  of  the  liquid  on  trays  1,  3,  5,  7,  9  was  measured  during  the  tran¬ 
sient  periods. 

Experimental  data  from  runs  Nos.  8,  6 -V  and  10-V  (run  desig¬ 
nation  used  by  Gerster  el  al  (40))  were  used  in  deriving  the  models  used 
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Table  5.3-1 

Parameters  for  the  Models  of  the  University  of  Delaware 

Distillation  Column  for  Feed  Composition  Changes 


TD(min„) 

v /mole  %x 
^mole  %’ 

t-j  (min. ) 

T2(min.) 

Top  composition 

2.0 

0.9 

5c  5 

6.0 

Tray  9* 

- 

1.8 

6o5 

- 

Tray  7* 

- 

2.5 

5.4 

- 

Tray  3* 

- 

3.5 

Od 

5.0 

Tray  1* 

- 

2. 9 

0.5 

8.0 

Bottom  composition 

- 

2  c  5 

3.0 

7.0 

*Parameters  are  for  the  transfer  function  relating  the  liquid  composi¬ 
tion  on  an  intermediate  tray  to  feed  composition  changes. 
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Table  5*3-2 

Parameters  for  the  Models  of  the  University  of  Delaware 

Distillation  Column  for  Reflux  Flow  Rate  Changes 


Tp(mine ) 

.^mole  %  x  mi n o  ^ 

M  lb*  mole  ' 

T-j  (min* ) 

T2(min* ) 

Top  composition 

1*0 

29*5 

3*5 

5*3 

Tray  9* 

- 

59*8 

5*9 

- 

Tray  7* 

- 

90*9 

6*4 

- 

Tray  3* 

0*5 

101  *5 

7*4 

- 

Tray  1* 

1*0 

83*3 

10*3 

- 

Bottom  composition 

1*0 

31*8 

5*5 

6*5 

^Parameters  are  for  the  transfer  function  relating  the  liquid  composi¬ 
tion  on  an  intermediate  tray  for  reflux  flow  rate  changes* 
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Table  5.3-3 

Parameters  for  the  Models  of  the  University  of  Delaware 

Distillation  Column  for  Boil -up  Rate  Changes 


xD(min.) 

„/mole  %  x  min. 
'  lb.  mole 

-)  t-j  (min. ) 

x^fmin. ) 

Top  composition 

2.0 

-34.8 

1.5 

11.0 

Tray  9* 

- 

-72.1 

12.5 

- 

Tray  7* 

- 

-77  o  2 

11.0 

- 

Tray  3* 

- 

-83.7 

1.0 

10.0 

Tray  1* 

- 

-96.2 

1.5 

9.0 

Bottom  composition 

- 

-46.2 

2.0 

8.0 

^Parameters  are  for  the  transfer  function  relating  the  liquid  composi¬ 
tion  on  an  intermediate  tray  for  boil -up  rate  changes. 
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in  this  study  due  to  the  following  reasons: 

(i)  Initial  steady-state  conditions  for  these  runs  were  nearly 
the  same.  These  operating  conditions  are  listed  in  Appendix  A.l. 

(ii)  Sizes  of  input  disturbances  were  relatively  small,  so  the 
system  can  be  regarded  as  approximately  linear. 

The  models  utilized  were  established  by  adjusting  different 
values  of  the  parameters  in  equations  (5.1-1)  or  (5.1-2)  until  there 
was  a  good  fit  between  the  models  and  experimental  data.  The  goodness 
of  fit  was  judged  simply  by  visual  observation. 

Tables  5.3-1,  5.3-2  and  5.3-3  list  the  empirical  models  es¬ 
tablished  from  the  data  obtained  by  Gerster  and  co-workers  and  used  in 
this  study  to  describe  the  composition  dynamics  of  the  column  for  changes 
in  feed  composition,  reflux  flow  rate  and  boil-up  rate  respectively. 

5.4  Dynamic  Models  of  the  University  of  Alberta  Distillation  Column 

A  description  of  the  University  of  Alberta  distillation 
column  can  be  found  in  Chapter  VII.  Process  transfer  functions  of  this 
column  for  different  types  of  disturbances  such  as  feed  flow  rate,  re¬ 
flux  flow  rate  and  steam  flow  rate  have  been  determined  using  pulse 
testing  data  taken  by  Berry  and  Pacey  (13).  For  each  disturbance, 
rectangular  pulses  of  different  magnitudes  and  directions  were  in¬ 
troduced  into  the  column.  The  initial  steady-state  operating  conditions 
were  maintained  nearly  constant  during  all  tests.  A  typical  list  of 
steady-state  data  is  given  in  Table  5.4-1. 
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Table  5.4-1 

Typical  Steady-State  Conditions  of  the 

University  of  Alberta  Distillation  Column 


Feed  flow  rate 

2.589  lb. /mine 

Reflux  flow  rate 

2,196  lb, /min. 

Steam  flow  rate 

1 ,973  lb . /min. 

Top  product  flow  rate 

1,331  lb, /min. 

Bottom  product  flow 

rate 

1,299  lb. /min. 

Feed  composition 

46.00  weight  %  methanol 

Top  product  composition 

95,89  weight  %  methanol 

Bottom  product  composition 

0.60  weight  %  methanol 

Temperature  of  the 

liquid  on  tray  1 

206, 1°F 

Temperature  of  the 

liquid  on  tray  2 

197. 5°F 

Temperature  of  the 

liquid  on  tray  3 

182, 63F 

Temperature  of  the 

liquid  on  tray  4 

173, 5° F 

Temperature  of  the 

liquid  on  tray  5 

163, 9°F 

Temperature  of  the 

liquid  on  tray  6 

157. 0°F 

Temperature  of  the 

liquid  on  tray  7 

152, 2°F 

Temperature  of  the 

liquid  on  tray  8 

148. 8°F 

Pressure  in  the  condenser 

-0.1  in,  of  H^O 

Feed  temperature 

163. 4°F 

Reflux  temperature 

150. 0°F 

’ 
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The  necessary  data  for  determining  the  transfer  functions  namely,  the 
disturbance  flow  rate,  the  top  product  composition,  the  bottom  product 
composition  and  the  liquid  temperature  on  intermediate  trays  in  addi¬ 
tion  to  values  of  other  variables  were  collected  using  the  data  acquisi¬ 
tion  capability  of  the  real-time  IBM  1800  digital  computer.  Off-line 
identification  of  process  parameters  for  models  of  the  form  given  by 
equations  5.1-1  or  5.1-2  was  done  using  the  Oldenbourg  and  Sartorius' 
method  (50)  to  calculate  the  time  delays  and  Rosenbrock's  search  pro¬ 
cedure  (63)  to  determine  the  best  values  of  gains,  time  constants  by 
fitting  experimental  data  in  the  time-domain.  Finally,  Bailey  and 
Law's  criteria  (8)  was  used  for  selecting  the  simplest  form  of  transfer 
function. 

It  was  found  that  the  data  from  all  tests  could  be  adequately 
represented  by  second  order  plus  time  delay  transfer  functions.  Further¬ 
more,  all  the  parameters  exhibited  some  dependence  upon  the  particular 
test  so  average  values  of  these  parameters  were  employed.  The  parameters 
of  the  models  used  in  this  study  are  given  in  Tables  5.4-2,  5.4-3  and 
5.4-4.  The  pulse  testing  data  are  given  in  the  distillation  column 
data  book  (13) . 


. 
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Table  5.4-2 

Parameters  for  the  Models  of  the  University  of  Alberta 

Distillation  Column  for  Feed  Flow  Rate  Changes 


TD(min.) 

K 

t-j  (min. ) 

Tgfmin. ) 

Top  composition 

3.5 

6.5 

5.1 

18.2 

Tray  8* 

3.5 

-  4.1 

4.3 

13.3 

Tray  7* 

3.2 

-  7.4 

6.0 

12.3 

Tray  6* 

1.6 

-15.1 

4.3 

14.2 

Tray  5* 

1.1 

-22.6 

2.7 

14.2 

Tray  4* 

- 

-23.9 

0.6 

14.7 

Tray  3* 

- 

-39.8 

0.6 

14.3 

Tray  2* 

0.5 

-42.1 

0.5 

13.4 

Tray  1* 

1.1 

-25.0 

0.6 

11.9 

Bottom  composition 

3.6 

3.7 

0.6 

12.9 

*Parameters  are  for  the  transfer  function  relating  the  liquid  temper¬ 
ature  on  an  intermediate  tray  to  feed  flow  rate  changes 
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Table  5,4-3 

Parameters  for  the  Models  of  the  University  of  Alberta 

Distillation  Column  for  Reflux  Flow  Rate  Changes 


TD(min.) 

K 

t-j  (min.) 

Tgfmin. ) 

Top  composition 

- 

19.7 

0.5 

27.7 

Tray  8* 

- 

-10.8 

0.4 

20.6 

Tray  7* 

0,3 

-20.6 

0,4 

20.0 

Tray  6* 

0.5 

-35.2 

0.6 

20.7 

Tray  5* 

0.8 

-45,2 

0.8 

19.6 

Tray  4* 

1.1 

-42.2 

1.3 

17,6 

Tray  3* 

1,3 

-69.7 

1.5 

19.0 

Tray  2* 

1.6 

-71 .6 

1.9 

18.2 

Tray  1* 

1,9 

-32.8 

1.9 

12.5 

Bottom  composition 

4.5 

4,9 

2.7 

13.7 

^Parameters  are  for  the  transfer  function  relating  the  liquid  temper¬ 
ature  on  an  intermediate  tray  to  reflux  flow  rate  changes. 
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Table  5.4-4 

Parameters  for  the  Models  of  the  University  of  Alberta 

Distillation  Column  for  Steam  Flow  Rate  Changes 


TD(min. ) 

K 

t i (min.) 

T^tmin, ) 

Top  composition 

1.1 

-24,8 

4.1 

16.0 

Tray  8* 

- 

20.3 

3.2 

16.4 

Tray  7* 

- 

36.1 

2.7 

15.8 

Tray  6* 

- 

58.8 

2.2 

16.1 

Tray  5* 

- 

84.9 

1.3 

16.6 

Tray  4* 

- 

81.9 

0.4 

16.4 

Tray  3* 

- 

134.5 

0.6 

16.2 

Tray  2* 

- 

149,2 

0.6 

15.9 

Tray  1* 

- 

93.4 

0.8 

15.6 

Bottom  composition 

3.3 

-14.0 

2,1 

14,2 

*Parameters  are  for  the  transfer  function  relating  the  liquid  temper¬ 
ature  on  an  intermediate  tray  to  steam  flow  rate  changes. 


For  Tables  5.4-2,  5.4-3  and  5.4-4,  the  following  units  apply: 

(i)  For  top  and  bottom  product  composition  changes, 

„  weight  %  x  min, 
lb. 

(ii)  For  the  liquid  temperature  on  an  intermediate  tray  changes, 

°F  x  min. 

lb. 
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CHAPTER  VI 
SIMULATION 

6.1  Introduction 

The  most  common  approach  to  predict  the  time  response  of  a 
process  is  to  simulate  the  system  on  an  analog  or  a  digital  computer. 

As  analog  computers  are  generally  limited  in  the  number  of  computing 
elements  they  contain  and  by  the  accuracy  of  these  elements,  the  simu¬ 
lation  of  large  or  complicated  systems,  especially  those  with  time 
delays,  is  more  convenient  if  done  on  a  digital  computer.  In  recent 
years,  many  digital  simulation  languages  have  become  available  to 
facilitate  the  simulation  of  systems  using  the  digital  computer.  One 
of  these  languages,  S/360  CSMP  (System/360  Continuous  System  Modeling 
Program)  has  been  implemented  on  the  IBM  360  computer  in  the  Computing 
Center  of  the  University  of  Alberta.  It  is  a  simulation-oriented 
program  designed  to  accept  problems  expressed  in  the  form  of  a  block 
diagram  or  a  system  of  ordinary  differential  equations.  The  program 
includes  a  basic  set  of  functional  blocks  with  which  the  components  of 
a  continuous  system  may  be  presented,  and  accepts  application  oriented 
statements  for  defining  the  connection  between  these  functional  blocks. 
S/360  CSMP  also  accepts  FORTRAN  statements.  Data  input  and  output  are 
facilitated  by  means  of  application-oriented  control  statements.  De¬ 
tailed  information  is  available  in  the  appropriate  manuals  (33,34). 
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6,2  Definition  of  the  Problem 

The  objective  of  the  present  simulation  study  is  to  predict 
the  control  performance  of  a  distillation  column  when  either  the  top 
product  composition  or  the  bottom  product  composition  or  the  composition 
(or  temperature)  on  one  of  the  intermediate  trays  is  to  be  maintained 
constant  in  spite  of  external  disturbances,  and  to  determine  from  the 
control  behavior  of  the  process,  which  tray  is  the  most  suitable  to 
control  the  top  or  bottom  product  composition  when  either  the  reflux 
or  the  steam  flow  is  used  as  the  corrective  variable.  As  most  dis¬ 
tillation  control  systems  are  regulatory  in  nature,  the  function  of 
the  system  is  to  hold  the  controlled  variable  steady  at  the  value  set 
by  the  reference  despite  any  disturbance  imposed  externally,  the 
optimum  controller  settings  will  be  based  upon  a  step  change  in  either 
the  feed  composition  or  the  feed  flow  rather  than  a  change  in  the  set 
point.  This  can  be  done  by  defining  a  performance  function.  The 
selection  of  such  a  function  to  evaluate  the  transient  behavior  of 
closed  loop  systems  is  arbitrary  since  no  single,  all  encompassing 
"optimum  performance  criterion"  exists.  Since  large  initial  errors 
in  the  transient  responses  are  to  be  avoided,  the  optimum  controller 

constants  are  taken  as  those  that  minimize  the  penalty  function 
00  o 

/  e  dt  (integral  of  the  squared  error  -  IoStEo). 
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Figure  6.3-1  Block  Diagram  of  Feedback  Control  of  Top  Product 
Composition  by  Manipulation  of  Reflux  Flow 


Figure  6.3-2  Block  Diagram  of  Feedback  Control  of  Bottom  Product 
Composition  by  Manipulation  of  Reflux  Flow 
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Figure  6.3-3  Block  Diagram  of  Feedback  Control  of  the  Liquid 
Temperature  (or  Composition)  on  an  Intermediate  Tray 
by  Manipulation  of  Reflux  Flow 
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Figure  6.3-4  Block  Diagram  of  Feedback  Control  of  Top  Product 
Composition  by  Manipulation  of  Steam  Flow 


Figure  6.3-5  Block  Diagram  of  Feedback  Control  of  Bottom  Product 
Composition  by  Manipulation  of  Steam  Flow 
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Temperature  (or  Composition)  on  an  Intermediate  Tray 
by  Manipulation  of  Steam  Flow 
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6.3  Block  Diagrams 

6.3.1  Feedback  Control 

Block  diagrams  of  feedback  control  schemes  using  either  the 
reflux  flow  or  the  steam  flow  as  the  manipulative  variable  are  shown 
in  Figures  6.3-1  through  6.3-6. 

6.3.2  Feedforward  Plus  Feedback  Control 

Block  diagrams  for  combined  feedforward-feedback  systems 
for  controlling  a  distillation  column  by  manipulation  of  reflux  flow 
or  steam  flow  are  shown  in  Figures  6.3-7  through  6.3-12. 

Depending  upon  the  dynamics  of  the  column  and  the  type  of 
feedforward  compensation  desired,  the  feedforward  controller  transfer 
function  Gpp  may  be  simple  as  a  proportional  gain  or  have  a  form  such 
as  gain  plus  time  delay,  gain  plus  time  lag  or  a  combination  of  both 
types.  For  the  present  study,  the  feedforward  controller  transfer 
function  is  considered  to  be  simply  a  gain.  It  can  be  shown  from 
Figures  6.3-7  through  6.3-12  that  when  the  column  is  subjected  to  a 
load  disturbance,  with  feedforward  control  only,  if  there  is  to  be 
no  steady-state  error  in  the  controlled  variable,  the  feedforward 
controller  gain  Kpp  must  be  equal  to: 

(i)  Control  of  top  product  composition  by  manipulation  of  reflux 

fl  ow 


KDL 


Ky  x  Kdr 


(6.3-1) 
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(ii)  Control  of  bottom  product  composition  by  manipulation  of 
reflux  flow 


K, 


K 


WL 


FF 


Ky  X  Kwr 


(6.3-2) 


(iii)  Control  of  the  composition  (or  temperature)  of  the  liquid 
on  intermediate  tray  i  by  manipulation  of  reflux  flow^ 


K 


K 


iL 


FF 


Ky  x  K-jR 


(6.3-3) 


(iv)  Control  of  top  product  composition  by  manipulation  of  reboil 


vapor  rate 


K 


K 


DL 


FF 


Ky  x  Kp  x  K[)y 


(6.3-4) 


(v)  Control  of  bottom  product  composition  by  manipulation  of  re¬ 
boil  vapor  rate. 


K 


K 


WL 


FF 


Ky  x  Kr  x 


(6.3-5) 


(vi)  Control  of  the  composition  (or  temperature)  of  the  liquid  on 
intermediate  tray  i  by  manipulation  of  reboil  vapor  rate„ 


K 


KiL 


FF 


Ky  x  x  K-y 


(6.3-6) 


.  V 


Figure  6.3-7  Block  Diagram  of  Feedforward  Plus  Feedback  Cotnrol 
of  Top  Product  Composition  by  Manipulation  of  Reflux  Flow 


Figure  6.3-8  Block  Diagram  of  Feedforward  Plus  Feedback  Control 
of  Bottom  Product  Composition  by  Manipulation  of  Reflux  Flow 
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Figure  6.3-9  Block  Diagram  of  Feedforward  Plus  Feedback  Control 
of  the  Liquid  Temperature  (or  Composition)  on  an  Intermediate  Tray 

by  Manipulation  of  Reflux  Flow 


Figure  6.3-10  Block  Diagram  of  Feedforward  Plus  Feedback  Control 
of  Top  Product  Composition  by  Manipulation  of  Steam  Flow 


Figure  6.3-11  Block  Diagram  of  Feedforward  Plus  Feedback  Control 
of  Bottom  Product  Composition  by  Manipulation  of  Steam  Flow 
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Figure  6.3-12  Block  Diagram  of  Feedforward  Plus  Feedback  Control 
of  the  Liquid  Temperature  (or  Composition)  on  an  Intermediate  Tray 

by  Manipulation  of  Steam  Flow 
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l<V»  Kr,  K^,  K^,  in  equations  (6.3-1)  through  (6.3-6) 
are  the  gains  of  the  transfer  functions  Gu,  GD,  G..  ,  G.D  and  G.u  re- 

V  K  1L  1  K  "IV 

specti vely . 

For  all  simulation  runs,  the  gain  of  the  feedforward  con¬ 
troller  Kpp  is  calculated  according  to  equations  (6,3-1)  through  (6.3-6), 
depending  on  the  case,  so  no  offset  will  result  in  the  controlled 
variable  of  the  feedforward  control  loop.  If  a  feedback  control  loop  is 
added,  in  principle,  a  proportional  controller  would  suffice.  In  a 
real  process,  perfect  feedforward  control  would  not  be  possible  due 
to  the  following  two  reasons: 

-  The  dynamic  behavior  of  the  real  process  may  not  be  perfectly 
described  by  a  linear  mathematical  model.  This  is  due  to  the  non¬ 
linear  nature  of  the  distillation  column  and  uncertainty  in  the  deter¬ 
mination  of  coefficients  of  the  linear  model. 

-  The  existence  of  possible  undetected  disturbances  in  the  dis¬ 
tillation  column. 

Therefore,  offset  in  the  controlled  variable  will  exist  if 
feedforward  control  only  is  used  or  if  a  proportional  controller  alone 
is  used  in  the  combined  feedforward-feedback  control  scheme.  The 
necessity  of  utilizing  integral  action  in  the  feedback  control  loop 
is  obvious. 

The  simulation  study  will  examine  the  performance  of  the 
distillation  column  under  feedforward  plus  feedback  control  using  not 
only  a  proportional  controller  in  the  feedback  loop  but  also  a  proportional 


5  <  :  no  bnrbnoqoq 
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plus  integral  controller  in  addition  to  feedforward  compensation. 

6.4  Results 

As  a  complete  set  of  transfer  functions  for  the  process  is 
available,  the  transient  response  can  be  evaluated  for  various  con¬ 
troller  settings  and  the  best  controller  constants  are  determined  by 
trial  and  error.  Unless  otherwise  noted,  all  runs  were  performed 
using  a  proportional  plus  integral  (PI)  feedback  controller  which  can 
be  represented  as: 


Derivative  action  was  not  investigated  as  the  temperature 
measurement  usually  is  a  noisy  signal  and  the  noise  is  amplified  by 
derivative  action.  Furthermore,  work  by  Rose,  Williams  and  co-workers 
(60,79)  has  shown  that  derivative  action  is  ineffective  in  controlling 
a  distillation  column.  Their  simulation  results  showed  that  the  only 

■  c 

action  of  derivative  control  was  to  add  noise  to  the  corrections 
called  for  by  the  proportional  plus  integral  control. 

All  simulations  in  this  control  study  have  been  done  using 
the  digital  simulation  language  S/360  CSMP.  Listings  of  some  typical 
programs  appear  in  Appendix  C.  Detailed  discussions  of  these  programs 
are  not  given  here  as  the  preparation  of  these  CSMP  statements  is  a 
rather  strai ghtforward  procedure.  However,  some  pertinent  features 
of  the  S/360  CSMP  which  have  been  used  to  advantage  to  reduce  the 


I 
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computing  time  will  be  mentioned  here: 

-  As  a  guide,  the  total  time  of  each  simulation  run  (FINTIM)  has 
been  limited  to  120.0  minutes.  For  all  practical  purposes,  the  complete 
transient  response  dies  out  after  this  amount  of  time  has  been  elapsed. 

A  longer  total  time  would  only  serve  to  lengthen  the  computing  time. 
Therefore,  in  evaluating  the  results,  the  integral  of  the  squared 
error  was  computed  from  0  to  120.0  minutes. 

-  To  reduce  unnecessary  calculations  when  instability  occurs  in 
the  transient  response,  the  simulation  run  will  be  terminated  even 
before  the  total  time  of  the  run  is  elapsed,  if  the  I.S.E.  is  larger 
than  a  predetermined  value.  This  value,  which  varies  from  tray  to 
tray  is  selected  by  experience. 

-  Selection  of  the  integration  method  and  the  integration  interval 
has  been  given  careful  consideration  to  further  reduce  the  computing 
time  required.  During  early  runs  of  the  simulation  study  where  it 

is  not  necessary  to  obtain  particularly  accurate  transient  responses, 
the  fixed-step  Runge-Kutta  routine  (RKSFX)  has  been  used.  The  inte¬ 
gration  interval  has  been  set  at  0.10  minutes  as  it  will  provide  re¬ 
latively  fast  execution  while  maintaining  enough  accuracy.  With  con¬ 
troller  settings  near  or  at  the  optimum  values,  high  accuracy  is  re¬ 
quired,  so  the  variable-step  Runge-Kutta  routine  (RKS)  is  used.  This 
procedure  has  the  advantage  of  ensuring  a  satisfactory  solution  with 
the  maximum  possible  step  size,  but  sometimes  at  the  cost  of  excessive 
computing  time.  Whenever  the  RKS  routine  is  used,  the  integration 
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interval  is  set  arbitrarily  at  0.20  minutes. 

Although  the  I.S.E.  has  been  chosen  as  the  overall  performance 
criterion  to  facilitate  the  determination  of  optimum  controller  settings, 
other  dynamic  performance  criteria  such  as  maximum  deviation,  offset 
and  settling  time  will  also  be  considered  in  any  final  judgement  of  the 
control  system  performance.  Unlike  maximum  deviation  and  offset  where 
standard  definitions  can  be  found  in  common  control  textbooks  (23,29), 
the  definition  of  the  settling  time  is  somewhat  arbitrary  and  there¬ 
fore,  it  requires  some  explanation.  During  this  investigation,  the 
settling  time  is  defined  as: 

(i)  If  there  is  no  offset  in  the  transient  response,  the  settling 
time  is  the  time  required  for  the  amplitude  of  oscillation  to  remain 
within  +_  5  per  cent  of  the  maximum  deviation. 

(ii)  If  there  is  offset  in  the  system,  the  settling  time  is  the 
time  required  for  the  system  response  to  remain  within  +  5  per  cent 
of  the  final  value. 

6,4.1  Simulation  Results  Using  Data  from  the  University  of  Delaware 
Distillation  Column 

To  study  the  control  performance  of  the  column, all  the  transfer 
functions  in  the  block  diagrams  given  in  Figures  6.3-1  through  6.3-12 
must  be  known.  The  dynamic  relations  of  the  distillation  process  it¬ 
self  were  listed  in  Tables  5.3-1,  5.3-2  and  5.3-3,  The  transfer 
functions  representing  the  dynamics  of  the  reboiler,  the  composition 
measuring  element  and  the  control  valve  have  to  be  evaluated. 
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Data  reported  by  Gerster  et  a!  (40)  revealed  that  there 


exists  a  lag  of  30  seconds  between  the  time  at  which  the  set  point 
of  the  steam  controller  is  changed  and  the  time  when  the  vapor  flow 
reaches  the  column,  so  a  first  order  transfer  function  with  a  time 
constant  equal  to  0,5  minutes  was  employed  to  describe  the  dynamics 
of  the  reboiler, 


0,5s  + 


where  V(s)  and  S(s)  are  the  Laplace  transforms  of  the  reboil  vapor 
rate  and  the  steam  flow  rate  respectively.  During  all  simulations, 
on  the  basis  of  calculations  from  Gerster's  data,  the  constant  \L  re¬ 


lating  the  steam  condensation  rate  and  the  boil  up  rate  was  taken  as 
being  equal  to 


lb.  mole/min,  of  reboil  vapor  rate 

lb. /min.  of  steam  rate 


Gerster  et  al  also  reported  that  a  delay  of  1,0  minutes  is 
required  for  the  liquid  sample  to  flow  from  the  sampling  point  to  a 
common  point  where  a  simultaneous  collection  of  all  samples  was  made. 
Thus,  it  can  be  assumed  that  the  error  E(s)  transmitted  to  the  con¬ 
troller  is  related  to  e(s)  ,  the  true  error,  by  the  following  transfer 


HD  =  HW  "  Hi  =  1,0s  ♦  1 


function: 


. 
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The  transfer  function  of  the  control  valve  was  taken  as 
unity,  that  is,  =  1.0.  This  assumption  of  only  a  gain  transfer 
function  is  very  reasonable  as  in  general,  the  dynamics  of  the  control 
valve  are  very  fast  compared  to  the  dynamics  of  the  process  itself. 

Only  single  point  sampling  of  top  product  composition, 
bottom  product  composition  and  composition  of  the  liquid  on  an  inter¬ 
mediate  tray  were  actually  studied  in  this  work.  During  this  in¬ 
vestigation,  to  simplify  the  computations,  it  was  assumed  that  these 
compositions  can  be  measured  and  fed  back  to  the  controller  continuously. 

A  stepwise  variation  in  feed  composition  of  5  mole  per  cent 
acetone  was  used  as  the  forcing  function  for  the  series  of  simulations 
carried  out  for  a  wide  range  of  controller  settings.  The  results  which 
give  the  minimum  I.S.E.  value  in  the  composition  of  the  controlled 
variable  are  presented  in  graphical  and  tabular  forms.  Typical  re¬ 
sults  are  exemplified  by  Figures  6.4-1  to  6.4-25  which  illustrate 
the  control  behavior  of  the  column  for  composition  control  of  trays 
7  and  9  by  manipulation  of  reflux  flow  and  trays  1,  3,  7  by  manipulation 
of  reboil  vapor  rate.  The  remaining  results  from  the  simulations  are 
tabulated.  This  is  considered  to  be  the  most  compact  and  direct  method 
of  illustrating  the  effects  of  the  control  point  on  the  distillation 
column  performance.  The  results  are  tabulated  in  Tables  6.4-1  through 
6.4-14.  In  all  the  graphs  and  tables  presented  in  this  section,  the 
following  units  apply: 
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“D 

xw 

xi 

Maximum  deviation  (McD.) 
Offset  (Off.) 

Settling  time  (S.T.) 
Integral  time  (x.) 

K 

c 

kff 


:  mole  per  cent  acetone 

:  mole  per  cent  acetone 

:  mole  per  cent  acetone 

:  mole  per  cent  acetone 

:  mole  per  cent  acetone 

:  minutes 
:  minutes 

.  Ibcmole/mino 
'  mole  per  cent 

1  b, mol  e/mi n0 

o  • 

*  mole  per  cent 


Xq,  X^  and  are  the  deviation  variables,, 

It  should  be  noted  that  composition  control  by  manipulation 
of  reboil  vapor  rate  necessitates  the  use  of  a  negative  feedback  con¬ 
troller  gain. 

The  following  cases  were  examined  in  this  part  of  the  in¬ 
vestigation: 

A.  Manipulation  of  reflux  flow 

(i)  Feedback  control  of  the  liquid  composition  on  an  intermediate 

tray . 

Summary  of  results  -  Table  6.4-1 

Typical  column  responses  -  Figures  6c 4-1  and  6,4-2 
(ii)  Feedforward  plus  feedback  control  of  the  liquid  composition 
on  an  intermediate  tray  using  a  proportional  controller  in  the  feed- 


. 
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back  loop. 

Summary  of  results  -  Table  6.4-2 

Typical  column  responses  -  Figures  6.4-3  and  6.4-4 

(iii)  Feedforward  plus  feedback  control  of  the  liquid  composition 
on  an  intermediate  tray  using  a  PI  controller  in  the  feedback  loop, 

t  =100.0  minutes. 

I 

Summary  of  results  -  Table  6 >4-3 

Typical  column  responses  -  Figures  6.4-5  and  6.4-6 

(iv)  Feedforward  plus  feedback  control  of  the  liquid  composition 
on  an  intermediate  tray  using  a  PI  controller  in  the  feedback  loop, 

Tj  =  10.0  minutes. 

Summary  of  results  -  Table  6.4-4 

Typical  column  responses  -  Figures  6.4-7  and  6.4-8 

(v)  Feedforward  plus  feedback  control  of  the  liquid  composition 
on  an  intermediate  tray  using  a  PI  controller  in  the  feedback  loop, 

=  1.0  minutes. 

I 

Summary  of  results  -  Table  6.4-5 

Typical  column  responses  -  Figures  6.4-9  and  6.4-10 

(vi)  Feedback  control  and  combined  feedforward-feedback  control 
of  top  product  composition. 

Summary  of  results  -  Table  6.4-6 

(vii)  Feedback  control  and  combined  feedforward-feedback  control 
of  bottom  product  composition. 

Summary  of  results  -  Table  6.4-7 


. 


■ 


102 


B.  Manipulation  of  steam  flow 

(i)  Feedback  control  of  the  liquid  composition  on  an  intermediate 

tray 

Summary  of  results  -  Table  6,4-8 

Typical  column  responses  -  Figures  6,4-11,  6,4-12  and 

6.4- 13 

(ii)  Feedforward  plus  feedback  control  of  the  liquid  composition 
on  an  intermediate  tray  using  a  proportional  controller  in  the  feed¬ 
back  loop. 

Summary  of  results  -  Table  6,4-9 

Typical  column  responses  -  Figures  6,4-14,  6,4-15  and 

6.4- 16 

(iii)  Feedforward  plus  feedback  control  of  the  liquid  composition 
on  an  intermediate  tray  using  a  PI  controller  in  the  feedback  loop, 

Tj  =  100,0  minutes. 

Summary  of  results  -  Table  6,4-10 

Typical  column  responses  -  Figures  6,4-17,  6,4-18  and 

6.4- 19 

(iv)  Feedforward  plus  feedback  control  of  the  liquid  composition 
on  an  intermediate  tray  using  a  PI  controller  in  the  feedback  loop, 
ij  s  10.0  minutes. 

Summary  of  results  -  Table  6,4-11 

Typical  column  responses  -  Figures  6  4-20 ,  6,4-21  and 

6  c  4-22. 
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(v)  Feedforward  plus  feedback  control  of  the  liquid  composition 
on  an  intermediate  tray  using  a  PI  controller  in  the  feedback  loop 
ij  =  1 .0  minutes. 

Summary  of  results  -  Table  6,4-12 

Typical  column  responses  -  Figures  6,4-23,  6,4-24  and 

6,4-25 

(vi)  Feedback  control  and  combined  feedforward-feedback  control 
of  top  product  composition. 

Summary  of  results  -  Table  6,4-13 

(vii)  Feedback  control  and  combined  feedforward-feedback  control 
of  bottom  product  composition. 

Summary  of  results  -  Table  6,4-14 

6,4,2  Simulation  Results  Using  Data  from  the  University  of  Alberta 
Distillation  Column 

The  transfer  functions  representing  the  dynamics  of  the  Uni¬ 
versity  of  Alberta  distillation  column  for  changes  in  feed  flow, 
reflux  flow  and  steam  flow  were  tabulated  in  Tables  5,4-2,  5.4-3,  and 
5,4-4.  It  should  be  mentioned  here  that  Table  5,4-4  actually  listed 
the  transfer  function  relating  the  liquid  temperature  on  intermediate 
trays ,  top  and  bottom  product  compositions  for  changes  in  steam  flow 
rate,  that  is  the  dynamics  of  the  reboiler  has  been  included  in  these 
transfer  functions,  therefore,  the  reboiler  transfer  function  has  been 
taken  as  equal  to  1.0,  Gp  =  1.0. 


. 
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Feedback  Control  of  the  Liquid  Composition  on  an  Intermediate  Tray 

by  Manipulation  of  Reflux  Flow 
(University  of  Delaware  Column) 
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TIME 9  MINUTES 

Figure  6.4-1  Feedback  Control  of  the  Liquid  Composition  on  Tray  7 

by  Manipulation  of  Reflux  Flow 
(University  of  Delaware  Column) 


nofi  faoqmoO  b'ruprJ  9ftt  foitnoO 


XWf  MOLE  PC  ACETONE  X3»  MOLE  EC  ACETONE  XD>  MCLE  PC  ACETONE 


106 


1-00 

0-50 
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Figure  6.4-2  Feedback  Control  of  the  Liquid  Composition  on  Tray  9 

by  Manipulation  of  Reflux  Flow 
(University  of  Delaware  Column) 
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TIME  9  MINUTES 

Figure  6.4-3  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  7  by  Manipulation  of  Reflux  Flow 
-  Proportional  Feedback  Controller 
(University  of  Delaware  Column) 
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TIME?  MINUTES 


Figure  6.4-4  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  9  by  Manipulation  of  Reflux  Flow 
-  Proportional  Feedback  Controller 
(University  of  Delaware  Column) 
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Feedforward  Plus  Feedback  Control  of  the  Liquid  Composition  on  an  Intermediate  Tray 
by  Manipulation  of  Reflux  Flow  -  PI  Feedback  Controller,  tt  =  100.0  min. 
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TIME?  MINUTES 

Figure  6.4-5  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  7  by  Manipulation  of  Reflux  Flow 
-  PI  Feedback  Controller,  Tj  =  100.0  min. 
(University  of  Delaware  Column) 
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Figure  6.4-6  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  9  by  Manipulation  of  Reflux  Flow 
-  PI  Feedback  Controller,  =  100.0  min. 
(University  of  Delaware  Column) 
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Figure  6.4-7  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  7  by  Manipulation  of  Reflux  Flow 
-  PI  Feedback  Controller,  Tj  =  10.0  min. 
(University  of  Delaware  Column) 
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TIME?  MINUTES 


Figure  6.4-8  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  9  by  Manipulation  of  Reflux  Flow 
-  PI  Feedback  Controller,  tj  =  10.0  min. 
(University  of  Delaware  Column) 
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TIME 9  MINUTES 


Figure  6.4-9  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  7  by  Manipulation  of  Reflux  Flow 
-  PI  Feedback  Controller,  ij  =  1.0  min. 

(University  of  Delaware  Column) 
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Figure  6.4-10  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  9  by  Manipulation  of  Reflux  Flow 

PI  Feedback  Controller,  Tj  =  1.0  min. 
(University  of  Delaware  Column) 
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TIME?  MINUTES 

Figure  6.4-11  Feedback  Control  of  the  Liquid  Composition  on  Tray  1 

by  Manipulation  of  Steam  Flow 
(University  of  Delaware  Column) 
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TIME?  MINUTES 

Figure  6.4-12  Feedback  Control  of  the  Liquid  Composition  on  Tray  3 

by  Manipulation  of  Steam  Flow 
(University  of  Delaware  Column) 
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Figure  6.4-13  Feedback  Control  of  the  Liquid  Composition  on  Tray  7 

by  Manipulation  of  Steam  Flow 
(University  of  Delaware  Column) 
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Figure  6.4-14  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  1  by  Manipulation  of  Steam  Flow 

-  Proportional  Feedback  Controller 
(University  of  Delaware  Column) 
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TIME 9  MINUTES 


Figure  6.4-15  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  3  by  Manipulation  of  Steam  Flow 
-  Proportional  Feedback  Controller 
(University  of  Delaware  Column) 
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TIME?  MINUTES 


Figure  6.4-16  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  7  by  Manipulation  of  Steam  Flow 
-  Proportional  Feedback  Controller 
(University  of  Delaware  Column) 
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Figure  6.4-17  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  1  by  Manipulation  of  Steam  Flow 
-  PI  Feedback  Controller,  Tj  =  100.0  min. 
(University  of  Delaware  Column) 
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Figure  6.4-18  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  3  by  Manipulation  of  Steam  Flow 
-  PI  Feedback  Controller,  Tj  =  100.0  min. 
(University  of  Delaware  Column) 
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TIME 9  MINUTES 

Figure  6.4-19  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  7  by  Manipulation  of  Steam  Flow 
-  PI  Feedback  Controller,  Tj  =  100.0  min. 
(University  of  Delaware  Column) 
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TIME 9  MINUTES 


Figure  6.4-20  Feedforward  plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  1  by  Manipulation  of  Steam  Flow 
-  PI  Feedback  Controller,  Tj  =  10.0  min. 
(University  of  Delaware  Column) 
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TIME?  MINUTES 


Figure  6.4-21  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  3  by  Manipulation  of  Steam  Flow 
-  PI  Feedback  Controller,  ij  =  10.0  min. 
(University  of  Delaware  Column) 
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TIME*  MINUTES 

Figure  6.4-22  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  7  by  Manipulation  of  Steam  Flow 
-  PI  Feedback  Controller,  Tj  =  10.0  min. 
(University  of  Delaware  Column) 
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TIME 9  MINUTES 


Figure  6.4-23  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  1  by  Manipulation  of  Steam  Flow 
-  PI  Feedback  Controller,  ij  =  1.0  min. 

(University  of  Delaware  Column) 
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TIME?  MINUTEE 


Figure  6.4-24  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  3  by  Manipulation  of  Steam  Flow 
-  PI  Feedback  Controller,  Tj  =  1.0  min. 

(University  of  Delaware  Column) 
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Figure  6.4-25  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Composition  on  Tray  7  by  Manipulation  of  Steam  Flow 
-  PI  Feedback  Controller,  x,  =  1.0  min. 

(University  of  Delaware  Column) 
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Feedback  Control  and  Feedforward  Plus  Feedback  Control  of  Bottom  Product  Composition 

by  Manipulation  of  Steam  Flow 
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In  determining  the  dynamics  of  the  measuring  elements,  it 
was  found  that  all  the  thermocouples  which  were  used  to  measure  the 
temperature  and  the  capacitance  cell  which  was  used  to  analyze  top 
product  composition  have  very  rapid  responses.  Consequently,  no 
dynamic  lag  is  assigned  to  these  measuring  elements  and  the  transfer 
functions  HQ  and  H.  are  considered  to  be  unity.  However,  the  dynamics 
for  the  analysis  of  the  bottom  product  composition  by  means  of  the  gas 
chromatograph  are  significant  and  must  be  considered.  The  bottom  is 
sampled  every  2,5  minutes  by  the  gas  chromatograph  since  a  time  of 
2,5  minutes  is  required  for  analysis  of  the  sample.  This  operation  then 
would  be  rigorously  represented  by  a  time  delay  in  series  with  a  zero- 
order  hold  device.  In  order  to  simplify  the  simulations,  it  was  as¬ 
sumed  that  the  effects  of  intermittent  sampling  could  be  neglected  so 
the  transfer  function  representation  for  the  gas  chromatograph  was  taken 
as : 


-2,5s 

HW  =  e 

As  was  the  case  for  the  simulations  done  using  data  from  the 
University  of  Delaware  distillation  column,  the  dynamics  of  the  control 
valve  were  considered  to  be  negligible. 

A  stepwise  variation  in  feed  flow  rate  of  0.430  lb. /min. 
was  used  as  the  forcing  function.  This  amount  represents  a  change  in 
feed  flow  rate  from  50  per  cent  to  70  per  cent  on  the  feed  flow  re¬ 
cording  chart.  Only  the  results  obtained  using  controller  settings 


•• 


H 


, 
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which  resulted  in  a  minimum  I.S.E.  value  in  the  controlled  variable 
are  presented  herein,,  Furthermore,  because  of  the  large  number  of 
possible  systems  simulated,  only  some  of  the  column  responses  to 
illustrate  the  general  behavior  are  included.  Those  tests  selected 
were  the  control  of  the  liquid  temperature  on  trays  6,  7,  8  by  mani¬ 
pulation  of  reflux  flow  and  the  control  of  the  liquid  temperature  on 
trays  1,  2,  6  by  manipulation  of  steam  flow,  The  parameters  tabulated 
to  describe  the  column  control  performance  of  the  column  are  the  maxi¬ 
mum  deviation,  offset,  settling  time  and  the  I,S,E„  values. 

In  all  the  graphs  and  tables  in  this  section,  the  following 
units  are  used. 


AD 

xw 

Ti 

Maximum  deviation  (M.D.) 
Offset  (Off.) 

Settling  time  (S.T.) 


:  weight  per  cent  methanol 
;  weight  per  cent  methanol 

:  °F 

:  weight  per  cent  methanol 
:  weight  per  cent  methanol 
:  minutes 
:  minutes 


K  (for  the  temperature  .  lb. /min » 
c  controller)  '  °F 


K  (for  the  composition 
c  controller) 


_ 1b, /min  o _ ( _ _ 

weight  per  cent  methanol 


_ _ Ib./min. _ 

:  weight  per  cent  methanol 


Xn ,  X,.,  T-  are  the  deviation  variables. 
D  w  l 


. 


145 


Ac  Manipulation  of  reflux  flow 

(i)  Feedback  control  of  the  liquid  temperature  on  an  intermediate 

tray , 

Summary  of  results  -  Table  6,4-15 

Typical  column  responses  -  Figures  6,4-26,  6,4-27  and 

6.4- 28 

(ii)  Feedforward  plus  feedback  control  of  the  liquid  temperature 
on  an  intermediate  tray  using  a  proportional  controller  in  the  feedback 
loop. 

Summary  of  results  -  Table  6,4-16 

Typical  column  responses  -  Figures  6,4-29,  6,4-30  and 

6.4- 31 

(iii)  Feedforward  plus  feedback  control  of  the  liquid  temperature 
on  an  intermediate  tray  using  a  PI  controller  in  the  feedback  loop, 

=  10.0  minutes 

Summary  of  results  -  Table  6,4-17 

Typical  column  responses  -  Figures  6,4-32,  6.4-33  and 

6.4- 34 

( i v )  Feedforward  plus  feedback  control  of  the  liquid  temperature 
on  an  intermediate  tray  using  a  PI  controller  in  the  feedback  loop, 
t j  =  1 o0  mi nutes . 

Summary  of  results  -  Table  6,4-18 

Typical  column  responses  -  Figures  6,4-35,  6.4-36  and 

6.4- 37 


- 
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(v)  Feedback  control  and  combined  feedforward-feedback  control 
of  top  product  composition. 

Summary  of  results  -  Table  6.4-19 

(vi)  Feedback  control  and  combined  feedforward-feedback  control 
of  bottom  product  composition. 

Summary  of  results  -  Table  6,4-20 

Be  Manipulation  of  steam  flow 

(i)  Feedback  control  of  the  liquid  temperature  on  an  intermediate 

tray. 

Summary  of  results  -  Table  6,4-21 

Typical  column  responses  -  Figures  6.4-38,  6.4-39  and 

6.4- 40 

(ii)  Feedforward  plus  feedback  control  of  the  liquid  temperature 
on  an  intermediate  tray  using  a  proportional  controller  in  the  feed¬ 
back  loop. 

Summary  of  results  -  Table  6,4-22 

Typical  column  responses  -  Figures  6.4-41,  6,4-42  and 

6.4- 43 

(iii)  Feedforward  plus  feedback  control  of  the  liquid  temperature 
on  an  intermediate  tray  using  a  PI  controller  in  the  feedback  loop, 

=  10,0  minutes 

Summary  of  results  -  Table  6,4-23 

Typical  column  responses  -  Figures  6.4-44,  6,4-45  and 

6.4- 46 
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(iv)  Feedforward  plus  feedback  control  of  the  liquid  temperature 
on  an  intermediate  tray  using  a  PI  controller  in  the  feedback  loop, 

Tj  =  1 . 0  mi nutes . 

Summary  of  results  -  Table  6.4-24 

Typical  column  responses  -  Figures  6.4-47,  6.4-48  and 

6.4-49 

(v)  Feedback  control  and  combined  feedforward-feedback  control 
of  top  product  composition. 

Summary  of  results  -  Table  6.4-25 

(vi)  Feedback  control  and  combined  feedforward-feedback  control 
of  bottom  product  composition  . 

Summary  of  results  -  Table  6.4-26 

The  case  of  feedforward  plus  feedback  control  of  the  liquid 
temperature  on  an  intermediate  tray  using  a  PI  feedback  controller 
with  ij  =  100.0  minutes  is  not  investigated  here  since  the  simulation 
results  in  section  6.4-1  and  preliminary  results  revealed  that  with 
t j  =  100.0  minutes,  not  enough  intergral  action  is  added  and  the  results 
are  nearly  the  same  as  the  case  of  feedforward  plus  feedback  control 
of  the  liquid  temperature  on  an  intermediate  tray  using  a  proportional 
feedback  controller. 


. 


- 
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Feedback  Control  of  the  Liquid  Temperature  on  an  Intermediate  Tray 

by  Manipulation  of  Reflux  Flow 
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TOP  COMPOSITION 
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Figure  6.4-26  Feedback  Control  of  the  Liquid  Temperature  on  Tray  6 

by  Manipulation  of  Reflux  Flow 
(University  of  Alberta  Column) 
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TIME?  MINUTES 


Figure  6.4-27  Feedback  Control  of  the  Liquid  Temperature  on  Tray  7 

by  Manipulation  of  Reflux  Flow 
(University  of  Alberta  Column) 
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Figure  6.4-28  Feedback  Control  of  the  Liquid  Temperature  on  Tray  8 

by  Manipulation  of  Reflux  Flow 
(University  of  Alberta  Column) 


Feedforward  Plus  Feedback  Control  of  the  Liquid  Temperature  on  an  Intermediate  Tray 
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TIME 9  MINUTES 


Figure  6.4-29  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Temperature  on  Tray  6  by  Manipulation  of  Reflux  Flow 
-  Proportional  Controller  Only 
(University  of  Alberta  Column) 
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Figure  6.4-30  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Temperature  on  Tray  7  by  Manipulation  of  Reflux  Flow 
-  Proportional  Feedback  Controller 
(University  of  Alberta  Column) 
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Figure  6.4-31  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Temperature  on  Tray  8  by  Manipulation  of  Reflux  Flow 
-  Proportional  Feedback  Controller 
(University  of  Alberta  Column) 
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Feedforward  Plus  Feedback  Control  of  the  Liquid  Temperature  on  an  Intermediate  Tray 
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TIME?  MINUTES 

Figure  6.4-32  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Temperature  on  Tray  6  by  Manipulation  of  Reflux  Flow 
-  PI  Feedback  Controller,  Tj  =  10.0  min. 
(University  of  Alberta  Column) 
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Figure  6.4-33  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Temperature  on  Tray  7  by  Manipulation  of  Reflux  Flow 
-  PI  Feedback  Controller,  ij  a  10.0  min. 
(University  of  Alberta  Column) 
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Figure  6.4-34  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Temperature  on  Tray  8  by  Manipulation  of  Reflux  Flow 
-  PI  Feedback  Controller,  tj  =  10.0  min. 
(University  of  Alberta  Column) 
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Figure  6.4-35  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Temperature  on  Tray  6  by  Manipulation  of  Reflux  Flow 
-  PI  Feedback  Controller,  ij  =  1.0  min. 

(University  of  Alberta  Column) 
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TIME?  MINUTES 


Figure  6.4-36  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Temperature  on  Tray  7  by  Manipulation  of  Reflux  Flow 
-  PI  Feedback  Controller,  Tj  =  1.0  min. 

(University  of  Alberta  Column) 
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TIME?  MINUTES 


Figure  6.4-37  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Temperature  on  Tray  8  by  Manipulation  of  Reflux  Flow 
-  PI  Feedback  Controller,  Tj  =  1.0  min. 
(University  of  Alberta  Column) 
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Figure  6.4-47  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Temperature  on  Tray  1  by  Manipulation  of  Steam  Flow 
-  PI  Feedback  Controller,  Tj  =  1.0  min. 

(University  of  Alberta  Column) 
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Figure  6.4-48  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Temperature  on  Tray  2  by  Manipulation  of  Steam  Flow 
-  PI  Feedback  Controller,  ij  *  1.0  min. 

(University  of  Alberta  Column) 
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Figure  6.4-49  Feedforward  Plus  Feedback  Control  of  the 
Liquid  Temperature  on  Tray  6  by  Manipulation  of  Steam  Flow 
-  PI  Feedback  Controller,  ij  =  1.0  min. 

(University  of  Alberta  Column) 
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Table  6,4-25 

Feedback  Control  and  Feedforward  Plus  Feedback  Control  of  Top  Product  Comp 

by  Manipulation  of  Steam  Flow 
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6c 5  Comparison  of  Different  Methods  of  Locating  the  "Optimum"  Control 

Point 

Five  different  methods  for  selecting  the  tray  location  for 
temperature  (or  composition)  control  of  a  distillation  column  have 
been  proposed  as  described  earlier  in  the  Literature  Survey  section. 

In  summary  form,  the  methods  are  the  following: 

(i)  Bertrand  and  Jones  method  f  The  control  point  should  be 
located  at  the  place  of  maximum  temperature  (or  concentration)  gradient 
in  the  column  which  has  the  least  hydrodynamic  delay.  This  method  is 
primarily  a  refinement  of  the  method  suggested  by  Boyd  (17)  and  Pyle  (57). 

(ii)  Uitti  method  t  The  control  point  should  be  located  where  the 
temperature  (or  concentration)  change  is  greatest  for  a  given  change 
in  the  overhead  product  purity  as  the  result  of  a  disturbance  to  the 
col umn. 

(iii)  Wood  method  ■?  This  method  specifies  the  control  tray  to  be 
that  tray  where  if  the  temperature  (or  composition)  of  the  liquid  on 
this  tray  is  kept  constant  will  give  a  minimum  steady-state  offset 
in  the  overhead  or  the  bottom  product  composition. 

( i v )  Rosenbrock  method  t  The  control  tray  should  have  the  greatest 
effect  in  maintaining  constant  conditions  throughout  the  column 

(v)  Williams  method  *  For  the  control  by  manipulation  of  reflux 
flow,  measurement  of  the  liquid  composition  on  the  top  tray  is  recoirmended, 
while  if  steam  flow  is  used  as  the  manipulative  variable,  locating  the 
sensor  on  the  bottom  tray  is  preferable. 
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These  methods  have  been  utilized  where  data  exist  to  predict 
the  control  tray  locations  for  the  two  columns  under  investigationc 
The  sensor  locations  have  then  been  compared  with  the  locations  pre¬ 
dicted  by  the  simulation  results.  The  sensor  location  determined  by 
the  latter  method  is  based  mainly  on  the  tray  where  if  the  liquid 
temperature  (or  composition)  on  this  tray  is  kept  constant,  will  give 
a  minimum  value  of  the  I,S,E,  performance  for  the  top  or  the  bottom 
product  composition. 

6.5.1  Predictions  of  the  Optimum  Control  Tray  Locations  for  the 
University  of  Delaware  Column 

To  determine  the  control  tray  location  by  the  Bertrand  and 
Jones  method,  the  steady-state  concentration  profile  has  been  plotted. 

It  can  be  seen  from  Figure  6.5-1  that  the  composition  gradient  is 
steepest  at  trays  9  and  3. 

The  necessary  calculations  used  to  determine  the  control 
tray  location  by  Rosenbrock’s  method  appear  in  Appendix  E.l,  whereas 
the  optimum  control  tray  location  predicted  by  the  simulation  results 
is  determined  by  examining  the  results  of  section  6.4-1, 

6.5.2  Predictions  of  the  Optimum  Control  Tray  Locations  for  the 
University  of  Alberta  Distillation  Column 

The  basis  for  the  selection  of  control  tray  location  using 
the  Bertrand  and  Jones  method  is  illustrated  in  Figure  6.5-2.  It  can 
be  seen  that  the  temperature  profile  is  steepest  at  tray  5  in  the  recti¬ 
fying  section  and  at  tray  3  in  the  stripping  section. 
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Figure  6.5-1  Composition  Profile  of  the  University  of  Delaware  Column 
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Table  6,5-1 

Predictions  of  the  Optimum  Control  Tray  Locations  by  Different  Methods 

(University  of  Delaware  Column) 
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To  specify  the  control  tray  location  by  the  methods  of  Uitti 
and  Wood,  tests  were  performed  on  the  actual  column  to  obtain  steady- 
state  data. 

To  obtain  the  data  necessary  to  apply  Uitti 's  method,  the 
reflux  flow  was  varied,  and  for  each  particular  reflux  rate,  the 
temperature  of  the  liquid  on  all  trays  was  recorded,  and  the  temperature 
variations  on  each  tray  can  be  calculatedc  Figure  6.5-3  shows  the 
amount  that  the  liquid  temperature  has  changed  on  any  tray  when  the 
product  quality  has  varied.  It  is  apparent  from  Figure  6.5-3  that 
trays  6  and  2  exhibited  the  greatest  changes  in  temperature  for  a  given 
change  in  product  purity. 

To  select  the  optimum  control  tray  location  using  Wood's 
method,  if  reflux  flow  is  used  as  the  manipulative  variable,  tests 
were  performed  at  different  reflux  flow  rates  with  the  steam  flow  rate 
held  constant.  In  order  to  evaluate  the  effect  of  feed  flow  rate  vari¬ 
ations,  a  change  of  feed  flow  rate  from  50  per  cent  to  40  per  cent  feed 
flow  (on  the  feed  flow  recording  chart)  was  used.  Figure  6.5-4  is  a 
plot  of  the  liquid  temperature  on  trays  6,  7  and  8  versus  top  product 
composition  at  varying  feed  flow  rates.  It  can  be  seen  from  Figure 
6.5-4  that  if  tray  8  is  the  control  tray  and  the  initial  overhead  product 
composition  is  95.50  per  cent  methanol,  holding  the  liquid  temperature 
on  this  tray  constant  would  result  in  overhead  product  containing  95.57 
per  cent  methanol  when  the  feed  flow  rate  decreases  from  50  per  cent  to 
40  per  cent.  Tray  8  should  be  used  as  control  tray  if  top  product  com- 
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Figure  6.5-2  Temperature  Profile  of  the  University  of  Alberta  Column 
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Figure  6.5-3  Change  of  the  Liquid  Temperature 
on  Intermediate  Trays  with  Top  Product  Composition 
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Figure  6.5-4  Liquid  Temperature  on  Trays  6,  7  and  8  vs. 

Top  Product  Composition 
(Manipulative  Variable:  Reflux  Flow) 
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Figure  6.5-5  Liquid  Temperature  on  Trays  1  and  2  vs. 

Bottom  Product  Composition 
(Manipulative  Variable:  Reflux  Flow) 
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Figure  6.5-6  Liquid  Temperature  on  Trays  6,  7  and  8  vs. 

Top  Product  Composition 
(Manipulative  Variable:  Steam  Flow) 
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Figure  6.5-7  Liquid  Temperature  on  Trays  1  and  2  vs. 

Bottom  Product  Composition 
(Manipulative  Variable:  Steam  Flow) 
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Table  6.5-2 

_P_redi ctions  of  the  Optimum  Control  Tray  Locations  by  Different  Methods 
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position  is  to  be  maintained  constant  and  reflux  flow  is  used  as  the 
manipulative  variable  since  holding  the  liquid  temperature  on  other 
trays,  for  instance  tray  6  and  7  constant  would  result  in  a  higher 
steady-state  offset  in  the  top  product  composition.  If  bottom  product 
composition  is  desired  and  reflux  flow  is  used  as  the  manipulative 
variable,  tray  1  should  be  employed  as  the  control  tray,  as  shown  in 
Figure  6.5-5,  Other  conclusions  for  the  case  where  steam  flow  is  used 
as  the  manipulative  variable  can  be  reached  by  examining  Figures  6.5-6 
and  6.5-7. 

Appendix  E.2  outlines  the  necessary  calculations  to  locate 
the  optimum  control  tray  by  Rosenbrock's  method. 

The  predictions  of  control  tray  location  from  simulation 
results  are  obtained  by  examining  the  results  of  section  6.4-2. 

6.6  Pi scussion 

6,6.1  Discussion  of  Simulation  Results 

An  analysis  of  the  simulation  results  reveal  the  following 

points . 

(i)  Effect  of  the  selection  of  the  order  of  the  transfer  functions 
representing  the  dynamics  of  the  column  t  As  shown  in  Figures  6,4-1  and 
6,4-2,  there  is  practically  no  transient  period  during  which  the  liquid 
composition  on  trays  7  and  9  would  be  of f- spec! fi cation.  This  is  pro¬ 
bably  the  result  of  the  approximation  of  the  dynamics  of  the  liquid 
composition  on  trays  7  and  9  to  changes  in  reflux  flow  by  a  simple 
first  order  transfer  function  without  time  delay.  The  addition  of  an- 
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other  first  order  transfer  function  representing  the  dynamics  of  the 
measuring  element  in  the  control  loop  has  essentially  no  de-stabil izing 
effect  on  the  column  responses.  However,  it  should  be  kept  in  mind 
that  the  selection  of  the  order  of  the  transfer  function  is  rather 
arbitrary,  and  consequently,  use  of  the  simplest  order  of  the  transfer 
function  might  result  in  the  conclusion  that  the  column  is  inherently 
stable  which  in  fact,  it  is  not. 

(ii)  Effect  of  the  presence  of  time  delay  in  the  control  loop  t 
The  impact  of  the  presence  of  a  pure  time  delay  in  the  control  loop 
can  be  seen  from  the  results  of  both  distillation  columns  under  in¬ 
vestigation  when  reflux  flow  is  used  as  the  manipulative  variable.  This 
can  be  appreciated  by  examining  Table  6.4-1  which  summarizes  some  of 
the  results  obtained  using  data  from  the  University  of  Delaware  column. 
Comparing  the  performance  of  this  column  when  tray  1  or  3  is  used  as 
control  tray  with  the  performance  of  the  column  when  the  liquid  com¬ 
position  on  tray  7  or  9  is  controlled  shows  that  due  to  a  time  delay 
of  0.5  minutes  and  1.0  minutes  in  the  control  loop  for  composition 
control  using  trays  3  and  1  respectively,  the  control  is  not  as  satis¬ 
factory  as  that  possible  using  tray  7  or  9  where  no  time  delay  is  present. 

The  simulations  using  data  from  the  University  of  Alberta 
distillation  column  also  show  this  effect.  This  can  be  seen  by  studying 
Table  6.4-16  or  Figures  6,4-26,  6.4-27  and  6.4-28.  Figures  6.4-26  and 
6.4-27  show  the  responses  of  the  column  with  feedback  control  of  the 
liquid  temperature  on  trays  6  and  7  respectively.  A  time  delay  of  0.5 
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minutes  was  present  in  the  temperature  control  loop  of  tray  6  and  a 
time  delay  of  0.3  minutes  was  associated  with  the  control  loop  of 
tray  7.  These  figures  should  be  compared  with  Figure  6.4-28  which 
shows  the  results  obtained  using  as  the  control  tray,  tray  8  where 
no  time  delay  is  present.  It  is  obvious  that  without  time  delay, 
the  column  is  inherently  stable,  as  the  liquid  temperature  on  tray 
8  can  be  controlled  very  closely  with  no  sign  of  oscillation.  Locating 
the  sensor  on  tray  6  or  7  results  in  slower  response  because  of  the 
exponential  lag  which  hinders  the  detection  of  the  temperature  changes 
that  are  occurring  and  the  application  of  proper  corrections.  As  the 
size  of  the  time  delay  increases,  the  period  of  oscillation  becomes 
larger.  From  these  results,  one  may  conclude  that  there  would  be  a 
deterioration  in  the  responses  that  would  be  obtained  by  locating  the 
sensor  on  any  tray  which  is  situated  far  down  the  column  where  the 
time  delay  in  the  control  loop  becomes  large  due  to  a  wide  separation 
between  the  control  point  and  the  reflux  flow  control  valve.  (The 
fluid  flow  lag  was  equivalent  to  0.27  minutes  per  plate).  Indeed, 
as  anticipated,  by  examining  Table  6.4-16,  the  transient  responses  of 
trays  1,  2  and  3  are  not  very  satisfactory  as  more  oscillatory  action 
is  present  and  the  responses  are  characterized  by  a  long  settling  time. 
In  addition,  due  to  the  phase  shift  involved  in  the  pure  time  delay, 
the  presence  of  any  amount  of  dead  time  in  the  process  results  in  a 
greatly  reduced  region  of  controllability  as  only  very  small  values  of 
proportional  constants  and  large  integral  time  constants  can  be  used 
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without  causing  unstability  in  the  column, 

(iii)  Effect  of  lag  in  the  reboiler  *  If  steam  flow  is  used  as  the 
manipulative  variable,  in  general,  the  lag  in  vapor  flow  between  inter¬ 
mediate  trays  is  negligible  and  the  main  contribution  to  the  lag  in¬ 
volved  comes  primarily  from  the  reboiler.  In  some  cases,  this  lag 
might  have  a  major  effect  on  the  controllability  of  the  column.  In¬ 
deed,  simulation  of  the  University  of  Delaware  distillation  column 
which  had  a  lag  of  0.5  minutes  in  the  reboiler  revealed  that  control 
of  this  column  by  manipulation  of  steam  rate  was  difficult.  This 
effect  can  be  seen  by  comparing  Figures  6,4-1  and  6.4-13.  Although 
both  transfer  functions  G^  and  are  of  first  order  type  without 
time  delay,  the  control  of  liquid  composition  on  tray  7  by  manipulation 
of  reboil  vapor  rate  is  not  as  satisfactory  as  manipulation  of  reflux 
flow.  The  oscillatory  behavior  in  Figure  6.4-13  is  due  presumably  to 
the  presence  of  three  first  order  transfer  functions  describing  the 
dynamics  of  the  process,  the  measuring  element  and  the  reboiler  it¬ 
self.  The  simulation  results  showed  that  use  of  the  boil-up  system 
with  the  University  of  Delaware  distillation  column  has  a  de-stabil izing 
effect  on  the  control  performance. 

With  the  University  of  Alberta  distillation  column,  due  to  the 
fast  dynamics  of  the  reboiler,  no  lag  was  involved,  therefore,  from 
the  control  point  of  view,  the  control  of  the  liquid  temperature  on  an 
intermediate  tray  by  manipulation  of  steam  flow  has  a  decided  advantage 
over  the  manipulation  of  reflux  flow,  as  can  be  seen  from  Figures  6.4-26 
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and  6.4-40.  It  is  obvious  that  the  response  of  the  liquid  temperature 
on  tray  6  by  manipulation  of  steam  flow  is  definitely  superior  to  the 
response  by  manipulation  of  reflux  flow.  In  fact,  as  shown  by  Table 
6.4-21,  the  liquid  temperature  on  any  intermediate  tray  of  this  column 
can  be  controlled  very  closely  by  manipulation  of  steam  flow  rate. 

(iv)  Effects  of  the  dynamics  of  other  elements  in  the  control 
loop  such  as  the  control  valve  and  the  measuring  element  v  The  addition 
of  the  dynamics  of  these  elements  in  the  control  loop,  in  most  cases, 
serves  only  to  cause  oscillations  in  the  control  responses  of  the 
column.  To  obtain  better  performance  of  the  column,  these  elements 
should  have  as  fast  a  response  as  possible.  Fortunately,  with  a  dis¬ 
tillation  column,  in  most  cases,  the  control  valve  has  a  fast  response 
compared  with  the  response  of  the  process,  so  the  major  problem  re¬ 
maining  is  to  find  a  measuring  element  with  a  fast  response.  Conse¬ 
quently,  because  of  the  fast  dynamics  of  the  thermocouples,  temperature 
control  would  be  preferred  over  composition  control  if  the  composition 
analyzer  has  a  large  measurement  lag 

(v)  Direct  control  of  top  product  composition  ■*  It  is  a  well 
known  fact  that  if  top  product  composition  is  desired,  the  direct 
sensing  of  overhead  composition  has  a  distinct  advantage  over  the 
sensing  of  the  liquid  temperature  (or  composition)  on  an  intermediate 
tray  since  no  offset  would  be  present  in  the  overhead  composition  if  a 
conventional  proportional  plus  integral  feedback  controller  is  used. 
However,  the  controllability  of  the  column  should  also  be  considered 
before  any  final  decision  is  made  concerning  the  sensor  location. 
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With  the  University  of  Alberta  distillation  column  simulation 
shows  that  best  control  can  be  achieved  by  sensing  top  product  composi¬ 
tion  and  using  reflux  flow  as  the  manipulative  variable.  The  increased 
stability  and  almost  no  variation  present  with  measurement  of  overhead 
product  composition  is  due  to  the  fact  that  the  capacitance  cell  can 
immediately  detect  the  effect  of  the  composition  change  and  then  the 
controller  can  almost  instantaneously  make  the  proper  adjustment  in 
the  reflux  flow  rate  to  compensate.  The  detection  of  overhead  com¬ 
position  would  have  allowed  very  large  values  of  controller  constants 
to  be  used  without  endangering  the  column  stability. 

However,  direct  analysis  of  overhead  composition  and  mani¬ 
pulation  of  reflux  flow  for  the  University  of  Delaware  distillation 
column  will  not  be  as  satisfactory.  This  is  due  to  the  measuring 
lag  of  the  overhead  composition  analyzer  and  the  presence  of  1,0 
minutes  of  time  delay  in  the  reflux  line.  This  rendered  the  column 
unstable  for  all  but  very  small  values  of  controller  gain. 

From  a  dynamic  standpoint,  the  control  of  top  product  com¬ 
position  by  manipulation  of  steam  flow  is  less  satisfactory  than  the 
control  of  the  liquid  temperature  (or  composition)  due  to  an  additional 
hydraulic  lag  in  the  reflux  accumulator, 

(vi)  Direct  control  of  bottom  product  composition  t  The  control 
of  bottom  product  composition  by  manipulation  of  reflux  flow  is  poor 
from  the  dynamic  standpoint  due  to  the  wide  separation  of  the  sensing 
element  and  the  reflux  control  valve.  The  advantage  of  direct  control 
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of  bottom  product  composition  by  manipulation  of  steam  flow  is  not  very 
great  since  the  change  in  the  bottom  product  composition  is  smaller 
than  the  change  in  the  liquid  composition  on  an  intermediate  plate, 
due  presumably  to  the  large  hold-up  of  liquid  in  the  reboiler.  In 
addition,  this  hold-up  volume  tends  to  contribute  some  delay  before 
changes  in  composition  are  noticed  at  the  bottom  of  the  column.  This 
control  arrangement  is  not  very  desirable  especially  for  the  University 
of  Alberta  distillation  column,  since  the  bottom  product  composition 
analyzer  has  a  large  time  delay  (2.5  minutes).  Here  the  sampling  on  an 
intermediate  tray  is  preferable,  if  bottom  product  composition  is  de¬ 
sired,  particularly  because  the  control  system  is  inherently  stable  and 
also  because  of  the  very  small  offset  in  the  bottom  product  composition. 

(vii)  Effect  of  adding  feedforward  control  v  The  simulation  results 
showed  that,  except  for  all  cases  where  the  control  system  is  inherently 
stable  where  feedback  control  alone  is  adequate,  the  transient  response 
of  the  liquid  temperature  (or  composition)  on  any  intermediate  tray 
under  feedforward  plus  feedback  control  was  superior  to  conventional 
feedback  control  alone,  even  if  the  simplest  type  of  feedforward  control 
action  is  used.  Examination  of  these  results  demonstrates  that  with 
feedforward  plus  feedback  control,  in  most  cases,  there  has  not  only 
been  a  marked  improvement  in  the  I.S.E.  of  the  liquid  temperature  (or 
composition)  on  intermediate  tray,  but  also  a  reduction  in  the  maximum 
deviation  from  the  set  point  and  a  shorter  settling  time.  The  amount 
of  improvement  that  would  result  from  installation  of  gain  feedforward 


„ 


203 


control  in  addition  to  an  existing  feedback  control  loop  would  likely 
be  significantly  greater  for  an  industrial  column  since  the  magnitude 
of  time  delay  present  in  the  control  loop  would  be  larger.  The  simu¬ 
lation  results  also  clearly  indicate  the  disadvantage  of  using  integral 
action  in  the  feedback  loop  if  feedforward  plus  feedback  control  is 
used.  The  addition  of  any  amount  of  integral  control  in  general  will 
increase  the  maximum  deviation,  the  settling  time  and  the  performance 
index  I.S.E.  Since  in  the  actual  process,  integral  action  would  be 
needed  to  eliminate  any  offset  due  to  unknown  disturbances  and  modeling 
errors  in  the  feedforward  controller,  this  amount  of  integral  control 
should  be  reduced  to  a  minimum.  Very  high  value  of  integral  action, 
for  instance  t-|  =1.0  minutes,  might  lead  to  the  column  behaving  in  an 
oscillatory  manner,  as  shown  in  Figure  6.4-35. 

Although  the  addition  of  feedforward  control  to  an  existing 
feedback  control  system  of  the  liquid  temperature  (or  composition)  on 
an  intermediate  tray  improves  the  control  response  of  the  liquid 
temperature  (or  composition),  it  does  not  necessarily  mean  that  the 
quality  of  top  or  bottom  product  composition  will  be  improved.  In 
most  cases,  the  effect  of  feedforward  control  action  on  the  value  of 
the  performance  index  I.S.E.  of  either  top  or  bottom  product  composition 
is  negligible.  Since  top  or  bottom  product  composition  is  of  primary 
importance,  and  feedforward  control  does  not  have  much  effect  on  the 
product  quality,  there  is  hardly  any  justification  for  the  use  of  com¬ 
bined  feedforward-feedback  control  of  the  liquid  temperature  (or  composi- 
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tion)  on  an  intermediate  tray.  On  the  other  hand,  the  addition  of 
feedforward  control  to  an  existing  feedback  control  loop  of  top  or 
bottom  product  composition  usually  improves  the  control  performance 
of  the  column  as  shown  by  Tables  6.4-6,  64-7,  6.4-13,  6.4-14,  6.4-19, 
6.4-20,  6.4-25  and  6.4-26. 

fviii)  Although  the  selection  of  the  overall  performance  index 
I.S.E.  was  arbitrary,  it  was  found  that  the  I.S.E.  criterion  generally 
gave  results  consistent  with  conventional  concepts  of  "good  control" 
as  the  control  response  is  rapid,  has  minimum  overshoot  and  small  off¬ 
set.  Also,  it  was  found  that  for  control  systems  for  which  the  column 
is  inherently  stable,  it  is  difficult  to  determine  the  optimum  con¬ 
troller  settings  exactly,  since  the  loS.E.  value  of  the  controlled 
variable  is  very  small.  However,  it  does  not  present  any  problem 
since  settings  near  the  optimum  result  in  control  which  is  nearly  as 
satisfactory  as  that  resulting  when  the  exact  values  are  used. 

6.6-2  Discussion  of  Different  Methods  of  Selecting  the  "Optimum" 

Control  Tray  Location 

It  can  be  seen  from  the  results  of  section  6.5  that  the 
selection  of  optimum  control  tray  based  on  the  simulation  results  did 
not  agree  very  well  with  the  selection  of  control  tray  using  the  methods 
suggested  by  Bertrand  and  Jones  (14)  and  Uitti  (15).  This  is  under¬ 
standable  since  with  the  methods  of  Bertrand  and  Jones  and  Uitti,  the 
main  concern  is  to  determine  the  locations  of  the  trays  away  from  the 
ends  of  the  column,  where  a  large  error  signal  to  the  controller  is 
possible  without  sacrificing  too  much  on  product  quality.  With  both 
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of  these  methods,  no  attention  has  been  paid  to  the  control  performance 
of  the  column  from  either  a  dynamic  or  a  steady-state  standpoint.  A 
constant  liquid  temperature  (or  composition)  at  one  of  these  trays  does 
not  mean  a  constant  product  composition,  as  shown  by  the  simulation 
results,  and  any  offset  present  in  the  overhead  or  bottom  product  com¬ 
position  would  be  weighted  heavily  in  the  calculations  of  the  perfor¬ 
mance  index  I.S.E.  Meanwhile,  in  the  simulation  results,  no  allowance 
was  made  for  possible  inability  of  the  temperature  (or  composition) 
transmitter  to  detect  small  variations  in  the  controlled  variable. 

The  choice  of  optimum  control  tray  location  using  Rosenbrock's 
method  (64)  seems  to  agree  with  the  selection  based  on  the  simulation 
results  of  the  University  of  Delaware  distillation  column.  It  is 
possible  that  any  agreement  on  the  choice  of  the  control  tray  by 
Rosenbrock's  method  and  simulation  results  is  purely  by  coincidence, 
since  the  principal  purpose  of  the  Rosenbrock  method  is  to  select  the 
trays  which  will  tend  to  bring  the  column  as  fast  as  possible  toward 
some  steady-state  but  this  method  does  not  ensure  that  this  steady- 
state  is  the  one  desired. 

Since  the  performance  index  I.SoE.  of  top  or  bottom  product 
composition  increases  with  the  time  if  an  offset  is  present  in  the 
product  compositions,  if  the  I.S.E.  is  evaluated  over  a  long  period, 
no  doubt,  the  offset  would  be  a  predominant  factor  and  in  the  end,  the 
selection  of  the  optimum  control  tray  based  on  the  minimum  I.S.E. 
would  be  the  same  as  the  selection  based  on  the  minimum  offset  in  product 
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compositions.  Although  the  Wood  method  of  selecting  the  control  tray 
did  not  consider  the  control  problem  from  a  dynamic  standpoint,  the 
selection  of  control  tray  by  this  method  will  often  give  results  that 
satisfy  the  control  problem  from  both  dynamic  and  steady-state  considera¬ 
tions.  Indeed,  results  from  both  distillation  columns  under  investigation 
revealed  that  if  reflux  flow  is  used  as  the  manipulative  variable,  the 
tray  which  gives  the  minimum  steady-state  error  in  the  top  product  com¬ 
position  is  close  to  the  top  of  the  column,  therefore,  in  general  the 
hydraulic  lag  in  the  control  loop  would  be  minimum.  With  steam  flow 
as  the  manipulative  variable,  since  the  vapor  flow  is  transmitted 
through  the  column  very  rapidly,  steady-state  error  is  the  main  factor 
in  deciding  upon  the  "optimum"  control  tray  location. 

In  any  event,  the  Wood  method  of  tray-to-tray  calculations 
is  very  helpful  as  it  provides  a  convenient  approach  to  calculate  with 
reasonably  high  precision  the  steady-state  offsets.  These  offsets,  in 
general,  can  not  be  predicted  accurately  by  a  linear  model.  The  non¬ 
linear  behavior  of  the  distillation  column  can  be  seen  by  examining 
Figures  6.5-4  through  6.5-7.  It  is  apparent  that  the  steady-state 
error  of  top  or  bottom  product  composition  for  a  given  change  in  feed 
flow  rate  does  not  have  a  fixed  value,  but  varies  according  to  the 
initial  steady-state  conditions.  For  instance  Figure  6.5-7  shows  that 
if  the  initial  steady-state  value  of  bottom  composition  is  0.6  per  cent 
methanol,  a  decrease  in  feed  flow  rate  from  50  per  cent  to  40  per  cent 
results  in  an  increase  of  0.28  per  cent  in  bottom  product  composition 
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if  the  liquid  temperature  on  tray  1  is  kept  constant  by  manipulation 
of  the  steam  flow.  However,  it  can  be  seen  that  if  the  initial  steady- 
state  value  of  bottom  product  composition  is  only  0.4  per  cent  methanol, 
and  the  liquid  temperature  on  tray  1  is  kept  constant,  no  offset  in 
bottom  composition  would  result. 
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CHAPTER  VII 
EXPERIMENTAL  RESULTS 


7.1  Introduction 

The  experimental  work  was  carried  out  on  the  University  of 
Alberta  distillation  column.  This  column  is  interfaced  with  an  IBM 
1800  digital  computer.  The  availability  of  a  process  control  computer 
permits  not  only  the  substitution  of  the  conventional  equipment  by 
using  direct  digital  control  (DDC)  but  it  also  allows  the  processing 
of  a  large  amount  of  data  acquisition  and  logging. 

A  series  of  experimental  tests  were  conducted  to  determine 
the  usefulness  of  empirical  models  in  predicting  the  control  response 
of  the  distillation  column  and  to  compare  the  actual  performance  of 
the  column  at  different  proposed  locations  of  the  sensor. 

7.2  Description  of  Experimental  Equipment 

The  pilot-scale  distillation  column  used  in  this  study  con¬ 
tains  eight  plates  and  is  nine  inches  in  diameter.  The  glass  column 
is  equipped  with  a  total  condenser  and  a  basket  type  reboiler.  The 
trays  were  of  the  bubble  cap  type  and  each  tray  is  fitted  with  four 
21/4x1  7/8-inch  diameter  bubble  caps,  1  1/2-inch  diameter  inlet  and 
outlet  weirs  and  an  1-inch  diameter  downcomer.  The  condenser  consists 
of  a  bundle  of  stainless  steel  tubes  in  a  nine-inch  diameter  by  three- 
foot  long  glass  shell,  and  the  reboiler  which  is  of  7-inch  nominal 
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diameter  contained  thirty  eight,  one-half-inch  diameter  by  twenty  four- 
inch  long  heating  tubes. 

Feed  of  a  predetermined  composition  drawn  from  either  one 
of  two  storage  feed  tanks,  each  of  200  gallon  capacity,  was  fed  to 
the  column  at  tray  4  (counted  from  the  bottom  upwards)  and  products 
were  combined  and  returned  to  the  same  tank,  hence  an  unlimited 
number  of  experimental  runs  could  be  performed  without  shutting  down 
the  column.  Feed  can  also  be  introduced  at  tray  5,  and  if  top  and 
bottom  products  are  desired,  they  can  be  returned  to  two  separate 
glass  lined  tanks.  Steam  preheaters  installed  on  the  feed  and  re¬ 
flux  lines  were  standard,  single  pass,  shell  and  tube  heat  exchangers. 

Two  different  instrumentation  systems  are  currently  avail¬ 
able  for  control  of  this  distillation  column:  conventional  analog 
and  computer  control  using  the  IBM  1800  digital  computer.  Presently, 
the  control  of  condenser  and  reboiler  liquid  levels,  feed  and  reflux 
temperatures,  and  pressure  in  the  condenser  is  only  possible  using 
conventional  analog  controllers.  The  tower  differential  pressure 
was  measured  but  not  used  for  control  of  the  steam  flow  rate  entering 
the  column.  The  system  is  designed  so  that  if  only  feedback  control 
of  top  product  composition  is  desired,  the  column  can  be  operated 
with  or  without  the  computer.  The  control  of  the  liquid  temperature 
on  an  intermediate  tray  or  bottom  product  composition  is  implemented 
by  means  of  the  computer. 

The  overhead  product  composition  was  continuously  monitored 
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Figure  7.2-1  Schematic  Diagram  of  the  Distillation  Column 
and  Its  Associated  Instrumentation 
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by  an  in-line  capacitance  cell  and  the  measure  of  change  in  dielectric 
constant  with  composition  was  tranduced  to  the  computer.  Design  de¬ 
tails  of  the  cell  are  given  by  Svrcek  (73).  The  bottom  product  com¬ 
position  was  analyzed  by  a  process  gas  chromatograph  interfaced  with 
the  computer  (11).  Iron-constantan  thermocouples  were  used  to  measure 
all  temperatures.  All  the  analog  signals  from  the  sensing  devices 
i.e.  thermocouples,  flowmeters,  pressure  transducer,  etc.... were 
logged  by  means  of  the  computer. 

The  column  and  its  associated  instrumentation  is  shown  in 
Figure  7.2-1.  A  more  detailed  description  of  the  equipment  is  avail¬ 
able  in  References  (51)  and  (73). 

7.3  Experimental  Procedure 

The  experimental  procedure  consisted  initially  of  bringing 
the  column  to  steady-state  and  starting  up  the  gas  chromatograph  used 
to  analyze  the  bottom  product  composition.  These  start-up  procedures 
are  available  in  Reference  (51).  The  following  description  outlines 
the  steps  that  are  required  to  initiate  and  complete  a  fully  docu¬ 
mented  run  on  the  distillation  column,  assuming  that  the  column  is 
running  at  the  desired  steady-state  with  the  desired  control  configu¬ 
ration  and  all  the  direct  digital  control  (DDC)  loops  are  in  the 
operable-manual  mode. 

7.3.1  Pre-run  Preparation 

Samples  of  both  feed  and  bottom  product  streams  are  taken 
and  their  compositions  are  measured.  These  measurements  are  required 
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to  establish  both  mass  and  energy  balances.  The  DDC  loop  monitoring 
the  liquid  temperature  on  an  intermediate  tray  should  have  the  de¬ 
sired  controller  constants  and  its  set  point  should  be  set  at  the 
same  value  as  its  current  measurement*  This  primary  temperature 
control  loop  would  then  be  switched  to  operable  automatic-mode. 

7.3.2  Initial  Steady-State  Documentation 

Steady-state  material  and  energy  balances  around  the  dis¬ 
tillation  column  were  made  for  each  run  by  queuing  the  process  pro¬ 
gram  DASS.  All  the  process  variables  which  have  been  interfaced 
with  the  IBM  1800  computer  are  recorded  at  every  scan  time  (for 
example  10  seconds)  for  a  certain  number  of  times  (for  example  10 
times  if  the  steady-state  calculations  were  made  over  100  seconds), 
then  averaged  and  the  results  printed  out  on  the  IBM  1132  line 
printer.  The  number  of  sampling  points  (i.e.  10)  and  the  scan  time 
(i.e=  10)  are  specified  and  can  be  modified  by  the  user  through  the 
teletype.  A  typical  output  is  shown  in  Appendix  D. 

7.3.3  Experimental  Test  Documentation 

After  the  steady-state  material  and  energy  balances  were 
computed  and  agree  within  about  five  per  cent;  initialization  of  data 
acquisition  of  various  process  variables  can  be  started  by  queuing 
the  process  program  0N0FF  from  the  teletype.  This  program  has  two 
main  functions:  Buffering  data  to  disk  and  monitoring  the  gas  chromato¬ 
graph. 

(i)  Buffering  data  to  disk.  The  0N0FF  program  ensures  that  all 
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the  necessary  DDC  control,  data  accumulation  loops  and  ring  buffers 
are  operable  by  entering  the  following  options  through  the  teletype: 

-  Option  Is  to  make  all  the  DDC  control  and  data  accumu¬ 
lation  loops  operable, 

-  Option  3:  to  make  all  the  ring  buffers  operable. 

The  DDC  file  counter  should  be  initialized  by  using  option 
5, 

(ii)  Monitoring  the  gas  chromatograph,  -  Option  8  of  ONOFF 
program  permits  the  user  to  sample,  analyze  and  print  out  the  bottom 
or  feed  composition.  Sub-option  0  is  used  if  bottom  product  composi¬ 
tion  is  to  be  measured  and  sub-option  1  is  used  if  feed  composition  is 
desired.  Once  initialized,  this  program  is  automatically  activated 
every  2,5  minutes  if  bottom  product  composition  is  desired  and  every 
3.0  minutes  if  feed  composition  is  desired. 

After  ONOFF  is  queued,  approximately  10  to  15  minutes  is 
allowed  for  initial  steady-state  data  accumulation  before  the  dis¬ 
turbance  is  entered.  The  feed  flow  disturbance  was  introduced  into 
the  distillation  column  by  changing  the  output  of  the  feed  flow  rate 
DDC  control  loop  by  means  of  the  teletype, 

7.3  4  Test  Termination 

When  the  test  was  completed,  after  approximately  two  to  two 
and  half  hours  of  operation,  a  print  out  of  the  final  steady-state 
documentation  was  obtained  by  queuing  the  DASS  process  program.  When 
the  documentation  was  complete,  the  ONOFF  program  was  then  queued. 
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Option  4,  once  entered,  stopped  the  buffering  of  data  to  disk,  option 
2  made  all  the  control  and  data  acquisition  non-operable  and  finally 
option  9  terminated  sampling  and  analysis  of  the  bottom  product  (or 
feed)  composition. 

7.3.5  Post-test  Documentation 

The  transient  data  buffered  to  disk  must  be  recovered  be¬ 
fore  the  DDC  file  counter  is  reinitialized  for  another  experimental 
run.  This  is  done  by  using  the  nonprocess  program  GTDAT .  This  pro¬ 
gram  prints  out  the  data  from  disk  on  the  IBM  1132  line  printer  and 
punches  the  data  onto  cards  for  future  processing. 

The  listings  for  all  these  programs  appear  in  Appendix  D. 

7.4  Results 

The  control  behavior  of  the  distillation  column  under  feed¬ 
back  control  of  the  liquid  temperature  on  an  intermediate  tray  was 
studied  for  increases  and  decreases  in  feed  flow  rate.  An  increase 
in  feed  flow  rate  is  a  step  change  from  50  per  cent  to  70  per  cent 
on  the  feed  flow  recording  chart  (which  corresponds  to  a  change  from 
2.47  lb. /min.  to  2.90  lb. /min.)  while  a  decrease  in  feed  flow  rate 
refers  to  a  step  change  from  50  to  30  per  cent  on  the  chart  which  is 
equivalent  to  a  change  from  2.47  lb. /min.  to  1.93  lb, /min. 

As  an  experimental  investigation  of  temperature  control  of 
the  liquid  on  every  single  individual  tray  would  prove  too  time  con¬ 
suming,  only  temperature  control  of  the  liquid  on  some  selected  trays 
was  studied.  To  evaluate  the  control  scheme  using  reflux  flow  as  the 
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manipulative  variable,  trays  7  and  8  were  successively  chosen  as  the 
control  tray.  The  selection  of  tray  8  is  desired  because  simulation 
results  revealed  that  it  is  the  optimum  tray  to  control  top  product 
composition.  Tray  7  was  chosen  to  study  the  effects  of  locating  the 
control  tray  down  the  column  to  get  a  larger  error  signal  for  the 
temperature  controller. 

To  evaluate  the  control  scheme  using  steam  flow  as  the 
manipulative  variable,  the  control  performance  of  the  column  was 
investigated  when  the  sensor  was  successively  located  on  trays  6  and 
1;  Tray  6  was  chosen  as  one  of  the  control  trays  for  the  experimental 
work  since  simulation  results  showed  that  it  is  the  best  tray  to  use 
for  control  of  the  overhead  composition.  Tray  1  was  selected  to  study 
the  effect  on  the  control  performance  of  locating  the  sensor  close  to 
the  control  valve. 

The  temperature  control  loop  was  implemented  by  using  the 
DDC  package  available  on  the  IBM  1800.  A  sampling  time  of  two  seconds 
was  chosen  in  order  to  minimize  the  effect  of  sampling  time  upon  the 
control  behavior  of  the  column.  The  following  two  cases  were  investi¬ 
gated: 

(i)  Feedback  control  of  the  liquid  temperature  on  an  intermediate 
tray  using  a  proportional  plus  integral  control  algorithm. 

Objective:  Minimize  the  I.S.E,  value  for  the  liquid  temperature 
on  the  control  tray. 

Optimum  controller  settings:  Table  7,4-1, 
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Typical  column  responses:  Figures  7,4-1  to  7.4-8, 

(ii)  Feedback  control  of  the  liquid  temperature  on  an  intermediate 
tray  using  a  proportional  control  algorithm. 

Objective:  Minimize  the  1 0 S 0 E .  value  for  the  overhead 
composition. 

Optimum  controller  settings:  Table  7,4-2* 

Typical  column  responses:  Figures  7,4-9  to  7.4-16. 

The  optimum  controller  settings  given  in  Tables  7.4-1  and 
7.4-2  were  determined  empirically  by  varying  different  loop  words 
corresponding  to  the  proportional  controller  gain  and  the  integral 
time  in  the  DDC  loop  record.  The  control  action  of  the  proportional 
plus  integral  DDC  controllers  can  be  expressed  as 

m(t)  =  K  e ( t )  +  K  x  K.  E  eft)  +  mQ  (7.4-la) 

r  r 

or  m(t)  -  K  eft)  +  K  x  E  eft)  +  mn  (7,4-lb) 

P  P  i  u 

where  m(t)  is  the  output  signal  of  DDC  algorithm  at  any  time,  itIq  is 
the  output  signal  of  DDC  algorithm  at  previous  calculation  and  At  is 
the  DDC  sampling  time. 

Although  the  I.S.E.  index  performance  was  calculated  during 
each  experimental  run,  it  was  not  used  as  the  sole  criterion  in  deter¬ 
mining  the  optimum  controller  constants  due  to  the  presence  of  noise 
in  the  process.  In  most  cases,  the  satisfactory  empirical  controller 
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Table  7.4-1 

Optimum  Controller  Constants  for  Temperature  Control  Loops 
(Objective:  constant  liquid  temperature  on  the  intermediate  control  tray) 


Manipulative 

Variable 

Control 

Tray 

Magnitude  of 
Disturbance 
(CHART  PER  CENT)** 

V 

V 

(sec.) 

8 

+  20% 

224.0 

128.0 

8 

-  20% 

224.0 

128.0 

Reflux  Flow 

7 

+  20% 

250.0 

160.0 

7 

-  20% 

224.0 

160.0 

6 

+  20% 

45.0 

270.0 

6 

-  20% 

64.0 

270.0 

Steam  Flow 

1 

+  20% 

24.0 

120.0 

1 

-  20% 

24.0 

120.0 

*DDC  values  as  given  by  equation  (7.4-la)  or  (7.4-lb). 

**+20%  is  equivalent  to  a  step  change  from  2.47  lb. /min.  to  2.90  lb. /min. 
-20%  is  equivalent  to  a  step  change  from  2.47  lb. /min.  to  1.93  lb. /min. 
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Figure  7*4-1  Feedback  Control  of  the  Liquid  Temperature  on  Tray  7 
by  Manipulation  of  Reflux  Flow  -  PI  Feedback  Controller 
(50%  -  70%  step  change  in  feed  flow) 
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Figure  7.4-2  Feedback  Control  of  the  Liquid  Temperature  on  Tray  7 
by  Manipulation  of  Reflux  Flow  -  PI  Feedback  Controller 
(50%  -  30%  step  change  in  feed  flow) 
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TIME?  MINUTES 

Figure  7.4-3  Feedback  Control  of  the  Liquid  Temperature  on  Tray  8 
by  Manipulation  of  Reflux  Flow  -  PI  Feedback  Controller 
(50%  -  70%  step  change  in  feed  flow) 
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Figure  7.4-4  Feedback  Control  of  the  Liquid  Temperature  on  Tray  8 
by  Manipulation  of  Reflux  Flow  -  PI  Feedback  Controller 
(50%  -  30%  step  change  in  feed  flow) 
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TIME?  MINUTES 

Figure  7.4-5  Feedback  Control  of  the  Liquid  Temperature  on  Tray  1 
by  Manipulation  of  Steam  Flow  -  PI  Feedback  Controller 
(50%  -  70%  step  change  in  feed  flow) 
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Figure  7.4-6  Feedback  Control  of  the  Liquid  Temperature  on  Tray  1 
by  Manipulation  of  Steam  Flow  -  PI  Feedback  Controller 
(50%  -  30%  step  change  in  feed  flow) 
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Figure  7.4-7  Feedback  Control  of  the  Liquid  Temperature  on  Tray  6 
by  Manipulation  of  Steam  Flow  -  PI  Feedback  Controller 
(50%  -  70%  step  change  in  feed  flow) 
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Figure  7.4-8  Feedback  Control  of  the  Liquid  Temperature  on  Tray  6 
by  Manipulation  of  Steam  Flow  -  PI  Feedback  Controller 
(50%  -  30%  step  change  in  feed  flow) 


. 


Table  7,4-2 


(Objecti 

ve:  constant 

top  product  composition) 

Manipulati ve 

Control 

Magnitude  of 

V 

Variable 

Tray 

Disturbance 
(CHART  PER  CENT)** 

8 

+  20% 

256.0 

Reflux  Flow 

8 

-  20% 

256.0 

7 

+  20% 

190.0 

7 

-  20% 

208.0 

6 

+  20% 

103.0 

Steam  Flow 

6 

-  20% 

75.0 

1 

+  20% 

10.5 

1 

-  20% 

63.0 

*DDC  values  as  given  by  equation  (7.4-la)  or  (7.4-lb). 

**+20%  is  equivalent  to  a  step  change  from  2.47  lb. /min.  to 
2.90  lb. /min. 

-20%  is  equivalent  to  a  step  change  from  2.47  lb. /min.  to 
1.93  lb ./min. 
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Figure  7.4-9  Feedback  Control  of  the  Liquid  Temperature  on  Tray  7 
by  Manipulation  of  Reflux  Flow  -  Proportional  Feedback  Controller 

(503>  -  70%  step  change  In  feed  flow) 
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Figure  7.4-10  Feedback  Control  of  the  Liquid  Temperature  on  Tray  7 
by  Manipulation  of  Reflux  Flow  -  Proportional  Feedback  Controller 

(50%  -  30%  step  change  in  feed  flow) 
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Figure  7.4-11  Feedback  Control  of  the  Liquid  Temperature  on  Tray  8 
by  Manipulation  of  Reflux  Flow  -  Proportional  Feedback  Controller 

(50%  -  70%  step  change  in  feed  flow) 
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Figure  7.4-12  Feedback  Control  of  the  Liquid  Temperature  on  Tray  8 
by  Manipulation  of  Reflux  Flow  -  Proportional  Feedback  Controller 

(50%  -  30%  step  change  in  feed  flow) 
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Figure  7.4-13  Feedback  Control  of  the  Liquid  Temperature  on  Tray  1 
by  Manipulation  of  Steam  Flow  -  Proportional  Feedback  Controller 

(50%  -  70%  step  change  in  feed  flow) 
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Figure  7.4-14  Feedback  Control  of  the  Liquid  Temperature  on  Tray  1 
by  Manipulation  of  Steam  Flow  -  Proportional  Feedback  Controller 

(50%  -  30%  step  change  in  feed  flow) 
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Figure  7.4-15  Feedback  Control  of  the  Liquid  Temperature  on  Tray  6 
by  Manipulation  of  Steam  Flow  -  Proportional  Feedback  Controller 

(50%  -  70%  step  change  in  feed  flow) 
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Figure  7.4-16  Feedback  Control  of  the  Liquid  Temperature  on  Tray  6 
by  Manipulation  of  Steam  Flow  -  Proportional  Feedback  Controller 

(50%  -  30%  step  change  in  feed  flow) 
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settings  were  judged  by  visual  observation. 

Although  many  tests  were  performed,  only  the  results  from 
the  experimental  tests  using  the  controller  settings  given  in  Tables 

7.4- 1  and  7.4-2  have  been  included. 

7.5  Discus si  on 

(i)  Feedback  control  of  the  liquid  temperature  on  an  intermediate 
tray  using  proportional  plus  integral  algorithm  v  Experimental  re¬ 
sults  revealed  that  for  all  four  trays  considered,  i.e.  trays  1,  6, 

7  and  8,  if  the  liquid  temperature  on  any  of  these  trays  is  kept  constant, 
an  increase  in  feed  flow  rate  would  result  in  a  decrease  in  top  product 
composition  and  vice-versa. 

For  increases  and  decreases  in  feed  flow,  if  reflux  flow  is 
used  as  the  manipulative  variable,  there  is  improvement  in  the  top 
product  quality  if  the  sensor  is  located  at  tray  8  instead  of  tray  7. 
Indeed,  positioning  the  sensor  on  tray  7  rather  than  tray  8  causes 
the  I.S.E.  of  top  product  composition  to  more  than  double  due  primarily 
to  a  large  offset  in  the  distillate  quality.  It  is  also  clearly 
evident  that  the  column  responds  more  rapidly  to  a  decrease  than  to 
an  increase  in  feed  flow  as  shown  by  comparing  Figures  7.4-1  and 

7.4- 2  or  Figures  7.4-3  and  7.4-4.  This  behavior,  no  doubt,  indicates 
the  non-linear  nature  of  the  system. 

Although  it  is  common  practice  to  have  the  control  tray  near 
the  corrective  medium,  if  overhead  composition  is  the  desired  product 
and  steam  flow  is  used  as  the  corrective  medium,  sometimes,  it  is 


236 


necessary  to  locate  the  sensor  some  distance  from  the  steam  flow.  For 
this  distillation  column,  locating  the  sensor  at  tray  1  would  result  in 
a  large  offset  in  the  top  product  composition,  as  indicated  by  Figures 
7.4-5  and  7.4-6,  while  selecting  tray  6  as  the  control  tray  has  the 
obvious  advantage  of  reducing  the  offset  in  the  overhead  composition, 
as  shown  by  Figures  7.4-7  and  7.4-8.  In  spite  of  the  fact  that  tray  6 
is  located  far  from  the  steam  control  valve,  the  control  of  liquid 
temperature  on  tray  6  presented  little  difficulty  since  there  is  only 
small  initial  departure  of  the  temperature  from  the  desired  value  and 
no  oscillatory  action  is  present.  This  can  be  explained  by  the  fact 
that  the  change  in  vapor  flow  rate  is  transmitted  through  the  column 
so  rapidly  that  the  elapsed  time  between  a  change  in  steam  flow  lead¬ 
ing  to  increased  boil -up  and  the  time  at  which  the  new  vapor  rate 
effects  the  liquid  temperature  on  tray  6  is  almost  negligible. 

(ii)  Feedback  control  of  the  liquid  temperature  on  an  intermediate 
tray  using  a  proportional  control  algorithm  t  In  most  cases  studied, 
by  using  a  proportional  controller,  with  proper  controller  settings, 
top  product  composition  can  be  maintained  almost  constant  as  shown 
in  Figures  7.4-9,  7.4-10  and  7.4-13  to  7.4-16.  The  lone  exception  is 
using  tray  8  as  the  control  tray.  As  can  be  seen  from  Figures  7.4-11 
and  7.4-12,  although  the  maximum  proportional  controller  constant 
available  using  a  single  DDC  loop  was  used  ( Kpmax  =  256.0),  it  was  im¬ 
possible  to  reduce  the  top  product  composition  offset  to  zero.  It 
appears  that  this  is  due  simply  to  the  fact  that  a  larger  proportional 
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controller  constant  than  available  using  a  single  DDC  loop  is  necessary. 

However,  the  control  schemes  using  only  a  proportional  con¬ 
troller  are  not  practical  since  it  is  not  always  possible  to  determine 
the  correct  optimum  controller  settings  so  that  no  offset  would  re¬ 
sult  in  the  overhead  composition.  These  settings  depend  upon  the 
magnitude  and  direction  of  the  upset,  as  can  be  readily  appreciated 
by  examining  the  proportional  gain  values  in  Table  7.4-2.  These 
values  varied  depending  upon  increases  and  decreases  in  feed  flow. 
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CHAPTER  VIII 

DISCUSSION  AND  CONCLUSIONS 

The  success  of  the  prediction  of  the  control  performance  of 
the  distillation  column  depends  upon  the  validity  of  the  models  used 
to  describe  the  dynamics  of  the  distillation  process  and  other  elements 
in  the  control  loop  such  as  the  sensing  device  and  the  control  valve. 

It  should  be  kept  in  mind  that  the  use  of  linear  models  to 
represent  the  dynamics  of  a  distillation  column  certainly  has  its 
limitations  due  to  the  non-linear  behavior  of  the  column.  For  instance, 
experimental  data  from  the  University  of  Delaware  column  revealed  that 
a  set  of  linear,  perturbation-type  differential  equations  can  predict 
the  unsteady-state  performance  of  this  column  with  reasonably  good 
accuracy  only  if  the  magnitude  of  any  perturbation  is  not  larger  than 
+  10  per  cent  of  its  steady-state  value.  In  the  case  of  the  University 
of  Alberta  distillation  column  a  series  of  experimental  tests  would 
need  to  be  performed  to  determine  how  large  the  magnitude  of  the  dis¬ 
turbance  can  be  for  the  column  to  still  be  considered  as  a  linear  system. 
The  use  of  simple  transfer  functions  such  as  those  in  Chapter  5  to  re¬ 
present  the  dynamics  of  the  column  for  both  increases  and  decreases  in 
feed,  reflux  and  steam  flows  is  only  justified  when  the  departure  from 
steady-state  conditions  is  small  enough  that  the  column  behaves  as  a 
linear  system.  In  view  of  the  large  magnitudes  of  the  disturbances  in 
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the  feed  rate  and  the  reflux  or  steam  flow  rate  which  occurs  due  to 
the  necessary  corrective  action,  the  agreement  between  the  simulation 
results  and  the  experimental  results  may  not  be  as  satisfactory  as  would 
be  expected.  This  results  because  with  deviations  of  such  large  magni¬ 
tudes,  the  distillation  column  can  no  longer  be  considered  as  a  linear 
process. 

Nevertheless,  by  comparing  the  simulation  results  with  the 
experimental  results,  it  appears  that  the  predicted  results  would  be 
good  enough  for  most  purposes,  particularly  for  just  comparing  the 
performance  of  the  column  at  different  proposed  locations.  Indeed, 
results  from  Chapters  6  and  7  showed  that  the  "optimum"  tray  location 
predicted  by  the  simulation  results  is  the  same  tray  as  indicated  by 
the  experimental  work.  The  use  of  simple  linear  models  would  not  predict 
the  steady-state  behavior  correctly  because  of  the  non-linearities  in 
the  system,  but  this  may  not  be  important,  since  steady-state  data  can 
be  predicted  by  routine  methods  such  as  tray-to-tray  calculations. 

To  determine  the  best  sensor  location  for  any  distillation 
column,  it  is  necessary  to  have  a  careful  specification  of  a  goal  for 
the  separation  involving  product  purities,  the  tolerances  allowed  in 
the  product  compositions,  the  type  of  sensing  element,  etc.  It  is  al¬ 
most  impossible  to  give  any  firm  general  recommendations.  However, 
simulation  results  from  both  columns  investigated  suggested  the  follow¬ 
ing  conclusions;  these  should  be  capable  of  extrapolation  to  large 
columns : 


■ 


240 


(i)  Every  effort  should  be  made  to  obtain  a  sensing  element  of 
high  sensitivity,  i.e.  one  which  can  measure  the  temperature  (or  com¬ 
position)  of  nearly  pure  streams,  and  it  should  have  a  fast  response 
to  any  sudden  change  in  temperature  (or  composition)  and  is  able  to 
provide  continuous  measurements, 

(ii)  If  such  a  sensing  device  is  available,  direct  control  of  top 
product  composition  by  manipulation  of  reflux  flow  or  direct  control 
of  bottom  product  composition  by  manipulation  of  steam  flow  should  be 
used  since  these  control  arrangements  generally  are  very  satisfactory 
from  both  dynamic  and  steady-state  standpoints.  In  some  columns, 
however,  the  large  hold-up  of  the  liquid  in  the  reboiler  and  the  reflux 
accumulator  might  have  a  de-stabil izing  effect  on  the  column  as  it  tends 
to  generate  additional  time  delay  in  the  control  loop.  In  these  cases, 
the  dynamic  advantages  of  these  control  schemes  might  not  be  so  great, 
but  unless  the  time  delay  is  excessively  large,  direct  measurement  of 
the  overhead  and  the  bottom  product  composition  is  preferable  in  most 
cases,  based  on  steady-state  characteristics, 

(iii)  If  top  product  composition  is  to  be  maintained  constant  using 
a  sensing  device  of  low  sensitivity,  measurement  on  an  intermediate 
tray  should  be  used.  Use  of  the  top  tray,  as  the  control  tray,  in 
conjunction  with  the  manipulation  of  reflux  flow  is  recommended  in 
most  cases  as  the  process  time  delay  and  the  steady-state  error  in  the 
overhead  composition  would  be  minimum.  In  addition,  the  fluid  flow 
lag  can  be  minimized  by  locating  the  reflux  flow  control  valve  very 
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close  to  the  top  tray. 

Should  the  sensing  element  be  incapable  of  detecting  small 
variations  of  the  controlled  variable  in  the  top  tray,  it  might  be 
necessary  to  move  the  sensing  point  a  few  trays  down  the  column. 

However,  it  should  be  kept  in  mind  that  if  reflux  flow  is  used  as 
the  manipulative  variable,  the  advantage  of  a  larger  error  signal 
will  be  counterbalanced  by  an  instability  induced  through  the  fluid 
flow  lags  between  the  trays  and  by  a  large  steady-state  offset  in  the 
overhead  composition* 

It  is  often  stated  that  a  possible  advantage  of  sampling 
near  the  feed  tray  is  that  changes  in  feed  composition  or  feed  flow 
rate  are  detected  sooner  and  corrective  action  can  start  before  off- 
specification  products  result.  However,  simulation  results  showed 
this  advantage  does  not  offset  other  disadvantages  caused  by  locating 
the  sensing  element  away  from  the  ends* 

(iv)  If  bottom  product  composition  is  to  be  controlled,  then 
control  by  manipulation  of  reflux  flow  is  not  advisable*  Indeed, 
the  direct  measurement  of  bottom  product  composition  or  the  measure¬ 
ment  of  the  liquid  composition  on  an  intermediate  tray  is  unsatisfactory 
from  a  dynamic  standpoing  due  to  the  wide  separation  between  the  sensing 
device  and  the  controlled  flow*  Use  of  a  tray  near  the  reflux  control 
valve,  in  general  results  in  a  large  steady-state  offset  in  the  bottom 
product  composition.  Therefore,  steam  flow  should  be  employed  as  the 
manipulative  variable  if  bottom  product  composition  is  to  be  kept  constant. 
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(v)  Whenever  a  very  large  error  signal  for  the  temperature  (or 
composition)  controller  is  needed,  then  measurement  on  an  intermediate 
tray  far  away  from  the  ends  of  the  column  is  required,  steam  flow 
should  be  used  as  the  manipulative  variable,  since  the  disadvantage 
of  locating  the  sensing  point  far  away  from  the  controlled  flow  would 
be  less  pronounced  for  boil-up  control  as  the  vapor  flow  lag  is  small 
and  may  be  negligible  compared  with  other  lags  in  the  control  loop. 
Except  with  very  large  distillation  columns,  this  flow  lag  is  generally 
unnoticeable.  The  success  of  the  control  scheme  using  steam  flow  as 
the  manipulative  variable  depends  mainly  on  the  dynamics  of  the  re¬ 
boiler  since  in  general,  the  major  lag  comes  from  the  reboiler  itself. 

(vi)  To  compare  the  performance  of  the  column  for  different  sensor 
locations,  the  determination  of  the  effective  time  delay  due  to  the 
fluid  flow  lag  is  of  prime  importance*  Since  the  time  constants  in 
the  transfer  functions  representing  the  dynamics  of  the  column  are 
about  the  same  for  any  control  point,  the  control  behavior  depends 
mainly  on  the  time  delay  in  the  control  loop.  Careful  studies  should 
be  conducted  to  evaluate  the  effective  time  delay  due  to  the  fluid 
flow  lag  to  permit  better  prediction  of  the  controllability  of  the 
column  at  different  control  points.  It  should  be  mentioned  here  that 
the  time  delay  determined  by  the  Oldenburg  and  Sartorius  method  or 
simply  by  visual  observation  might  not  be  satisfactory  since  it  is 
possible  that  this  time  delay  might  not  accurately  describe  the  true 
fluid  flow  lag  in  the  column,  and  therefore,  erroneous  conclusions 
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about  the  column  performance  might  result. 

In  addition,  in  many  actual  systems,  the  use  of  the  sensing 
device  and  the  control  valve  would  introduce  some  dynamic  lag  in  the 
system.  These  lags  would  need  to  be  determined  as  accurately  as 
possible. 

(vii)  If  direct  measurement  of  top  and  bottom  product  composition 
is  employed,  and  time  delay  and  other  lags  are  present  in  the  control 
loop,  combined  feedforward-feedback  control  is  very  helpful  in  damping 
out  oscillatory  behavior  and  reducing  the  maximum  overshoot. 

However,  feedforward  plus  feedback  control  of  the  liquid 
temperature  (or  composition)  on  an  intermediate  tray  is  seldom 
necessary  since  there  is  little  improvement  in  product  quality. 

(viii)  Feedback  control  of  the  liquid  temperature  on  an  intermediate 
tray  using  a  proportional  control  only  so  that  there  is  no  composition 
offset  in  one  of  the  product  streams  is  desirable  but  not  very  practical 
since  this  control  arrangement  suffers  from  the  drift  in  the  product 
quality  caused  by  imperfect  modelling  and  secondary  disturbances  in  the 
process . 

Finally,  the  following  summary  gives  some  guidelines  which 
might  be  useful  in  selecting  the  control  tray: 

-  The  control  tray  should  be  one  where  easy  measurements  of 
changes  in  temperature  (or  composition)  is  possible  in  the  absence  of 
control . 

-  The  tray  should  be  where  a  constant  liquid  temperature  (or 
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composition)  on  this  tray  ensures  a  satisfactory  product  quality. 
Wood's  method  of  tray-to-tray  calculations  proved  very  valuable  to 
determine  the  location  of  this  tray. 

-  The  tray  should  be  chosen  so  that  the  hydrodynamic  delay 
should  be  as  small  as  possible. 

-  The  tray  should  be  chosen  so  that  if  the  liquid  temperature 
(or  composition)  on  this  tray  is  maintained  constant,  the  column 
tends  as  fast  as  possible  to  the  desired  steady-state  in  the  absence 
of  further  disturbances.  In  the  presence  of  continued  disturbances, 
the  column  departs  as  little  as  possible  from  the  desired  steady- 
state.  Rosenbrock's  method  (64)  can  be  used  to  determine  the  location 
of  the  tray  with  these  characteristics. 

None  of  these  guidelines  can  be  applied  without  due  regard 
for  the  others  and  the  final  choice  of  the  sensing  location  depend  on 
the  information  available  and  engineering  judgement. 
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NOMENCLATURE 


The  nomenclature  which  appears  at  only  one  location  in  the 
thesis  is  defined  at  that  point  and  does  not  appear  in  this  list. 

(a)  Mathematical  Symbols 

liquid  composition  (or  temperature)  on  tray  i 
D  distillate  flow  rate 

F  feed  flow  rate 

6^  feedback  controller  transfer  function 

Grc  feedforward  controller  transfer  function 

r  r 

G  transfer  function  of  process 

Gdl  Xd(s)/L(s) 

Gdr  Xd(s)/R(s) 

Ddv  Xd(s)/V(s) 

G-l  C.(s)/L(s) 

G.r  C.(s)/R(s) 

G.v  Ci (s)/V(s) 

Gr  transfer  function  for  the  reboiler 

Gy  transfer  function  for  the  control  valve 

Si  XyUJ/LU) 

Sr  Xw(s)/R(s) 

GWV  X^(s)/V(s) 

h  transfer  function  for  the  overhead  composition  sensing  element 


. 
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H 


W 


K 

Kc 

K 

K 


FF 


L 

n 

R 

(s) 
S 
t 
T. 

V 
Xr 


i 


D 


X, 


Xi 


X 


u 


T1  ,t2 


T 


D 


transfer  function  for  the  sensing  element  used  to  measure 
the  liquid  temperature  (or  composition)  on  intermediate 
tray  i 

transfer  function  for  the  bottom  product  composition 
sensing  element 

proportional  gain  of  the  transfer  function  G 

feedback  controller  gain 

feedforward  controller  gain 

DDC  proportional  controller  gain 

load 

total  number  of  trays  in  a  distillation  column 
reflux  flow 

Laplace  transform  operator 

steam  flow 

time 

temperature  of  the  liquid  on  tray  i 
boil -up  rate 
top  product  composition 
feed  composition 

liquid  composition  on  intermediate  tray  i 
bottom  product  composition 
,Tg  time  constant 
time  delay 

integral  time  of  the  feedback  controller 
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a)  frequency 

At  DDC  sampling  time 

(b)  Abbreviations 


Comp, 

Compos i ti on 

Deg, 

Degree 

I  „  S  o  E  o 

Integral  of  the  squared  error 

Llq  c 

Liquid 

M.D. 

Maximum  deviation 

MEOH 

Methanol 

Off. 

Offset 

pc 

per  cent 

S.T. 

Settling  time 

Temp . 

Temperature 

ppm 

part  per  million 

■- 
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CONTROL  SCHEME  SYMBOLS 


Flow  Recorder 

Flow  Recorder  Controller 

Gas  Chromatograph 

Level  Indicator  Controller 

Pressure  Indicator  Controller 
Temperature  Recorder  Controller 


Process 

Measurements 
Analog  Control  Lines 
Computer  Control  Lines 
Control  Valve 


■ 
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APPENDIX  A 

COMPARISON  OF  EXPERIMENTAL  DATA  WITH  THE  PROPOSED  MODELS 


A. 1  Comparison  of  Experimental  Data  with  the  Proposed  Models  for  the 

University  of  Delaware  Distillation  Column 

A  typical  list  of  steady-state  operating  conditions  for  the 
University  of  Delaware  column  is  given  in  Table  A, 1-1. 

Figures  A. 1-1  to  A. 1-18  are  plots  of  the  change  of  top  product 
composition,  bottom  product  composition  and  the  liquid  composition  on 
intermediate  trays  1,  3,  7,  9  of  this  column  for  a  step  change  in  feed 
composition,  reflux  flow  and  reboil  vapor  rate.  The  points  are  the 
experimental  values  and  the  solid  lines  represent  the  data  as  predicted 
by  the  models  used  in  this  work. 

Figures  A. 1-1  to  A. 1-6  show  the  transient  response  of  this 
column  for  Run  No.  8  where  feed  composition  was  increased  by  8.2  mole 
per  cent  acetone,  Figures  Ad-7  to  A. 1-12  give  the  transient  response 
for  Run  No.  6 -V  where  reflux  flow  was  increased  by  13.7  per  cent  and 
Figures  A. 1-13  to  A. 1-18  are  the  transient  response  of  this  column  for 
Run  No.  10-V  where  reboil  vapor  rate  was  increased  by  6.7  per  cent  from 

its  initial  steady-state  value. 

Steady-state  data  for  each  of  these  runs  (8,6-V  and  10-V)  are 
available  in  Reference  (40).  All  run  numbers  in  section  Ad  were  de¬ 
signated  by  Gerster  et  al  (40). 
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Table  A. 1-1 

Typical  Steady-State  Conditions  of  the 

University  of  Delaware  Distillation  Column 

(Run  No.  8) 


Feed  flow  rate 

Reflux  flow  rate 

Boil -up  flow  rate 

Top  product  flow  rate 

Bottom  product  flow  rate 

Feed  composition 

Top  product  composition 

Bottom  product  composition 

Composition  of  the  liquid  on  tray  1 

Composition  of  the  liquid  on  tray  2 

Composition  of  the  liquid  on  tray  3 

Composition  of  the  liquid  on  tray  4 

Composition  of  the  liquid  on  tray  5 

Composition  of  the  liquid  on  tray  6 

Composition  of  the  liquid  on  tray  7 

Composition  of  the  liquid  on  tray  8 

Composition  of  the  liquid  on  tray  9 

Composition  of  the  liquid  on  tray  10 

Pressure  in  the  condenser 

Feed  temperature 

Reflux  temperature 


I. 4932  1 b. mol  e/mi n. 
0,9235  Ib.mole/min. 
2.2300  Ib.mole/min. 
0.8276  Ib.mole/min. 
0.6652  Ib.mole/min. 
48.0  mole  %  acetone 

79.2  mole  %  acetone 
8.1  mole  %acetone 

II . 4  mole  %  acetone 
20.0  mole  %  acetone 

29.5  mole  %  acetone 

36.8  mole  %  acetone 

43.2  mole  %  acetone 

44.6  mole  %  acetone 

49.2  mole  %  acetone 

54.9  mole  %  acetone 
61 .8  mole  %  acetone 

70.2  mole  %  acetone 

39.7  psia 
100, 0°F 
94.0°F 


. 


3NLU.DV  3d  TIGrt  ‘OX  'JNDiJJV  3J  1  IJh  ‘MX 


A- 3 


Fi gure  A. 1 -1 


ixl  "C  — 


3*Q 


G *0- 


-3-0- 


o„p 

«.  /  *  w 


-2*3 


v' 


.G\Z\ 


C-0 


4*0 


B 


n 


BCTTCM  £DF&?JIC\ 


.12 "  0 


- as: 


1G"C  20 r  0 


TIME?  MINUTE,!; 


c 


Figure  A. 1-2 


X3>  MOLE  PC  ACETONE  XI?  MOLE  EC  ACETONE 


A-4 


Figure  A. 1-3 


Figure  A. 1-4 


xg?  mole:  dc  acetone  X7?  mole,  pc  acetone 


A-5 


Figure  A. 1-5 


Fi gure  A. 1 -6 


XW i  MOLE  PC  ACETONE  XD>  MOLE  PC  ACETONE 


A-6 


Figure  A. 1-7 


Figure  A. 1-8 


>05  un  F  PC  ACFJGNF.  XI 5  MOLE  PC  ACETONE 


A-7 


Figure  A.  1-9 


Figure  A. 1-10 


• 

X3?  MOLE  FC  ACETONE  X7?  MOLE  FC  ACETONE 


A-8 


Fi gure  A. 1-1 1 


COMP*-  ON  TRAY  3 


— I -  |_ 

1(3  "  0  C  ?0  r  Q 


Fi gure  A. 1 -1 2 


XW»  MOLE  pc  acetone  XO?  MOLE  pc  ACETONE. 


A-9 


Figure  A. 1-13 


Fi gure  A. 1 -14 


X3,  MDLE  PC  ACETONE  Xi?  MQlE_  pc  acetqne 


A- 10 


Figure  A. 1-1 5 


Figure  A. 1-16 


X3>  MOLE  PC  ACETONE  X7>  MOLE  PC  ACETONE 


A-l  1 


-12 '3  +  lIQ-  LuMp-  ON  TRAY  7 

l 


Figure  A. 1-17 
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A. 2  Comparison  of  Experimental  Data  with  the  Proposed  Models  for  the 

University  of  Alberta  Distillation  Column 

Figures  A. 2-1  to  A,2-60  show  the  transient  responses  of  the 
University  of  Alberta  distillation  column  for  both  increases  and  de¬ 
creases  in  feed  flow,  reflux  flow  and  steam  flow.  The  solid  lines 
represent  the  experimental  values  and  the  points  are  the  data  as  pre¬ 
dicted  by  the  models  used  in  this  worke 

The  disturbance  enters  the  column  in  the  form  of  a  rectangular 
pulse  of  known  magnitude  and  duration. 

Captions  for  these  figures  appear  in  Table  A. 2-1. 


A- 1 3 


Table  A. 2-1 

Captions  for  Figures  A. 2-1  to  A. 2-60 


Figure 

Identification 

Disturbance 

Pulse 
Magnitude 
(lb. /min. ) 

Pul  se 
Duration 
(min, ) 

A. 2-1 
to  A. 2-10 

Feed  Flow 
(Run  No.  24*) 

2.57 
to  3.02 

9.6 

A. 2-11 
to  A. 2-20 

Feed  Flow 
(Run  No.  21*) 

2.57 
to  2.33 

15.2 

A. 2-21 
to  A. 2-30 

Reflux  Flow 
(Run  No.  22*) 

1.93 
to  2.23 

13.1 

A. 2-32 

Reflux  Flow 
(Run  No.  21*) 

1.93 
to  1.75 

18.4 

A. 2-31  and 

A. 2-33 
to  A. 2-40 

Reflux  Flow 
(Run  No.  24*) 

1.93 
to  1.74 

7.5 

A. 2-42  and 

A. 2-49 

Steam  Flow 
(Run  No.  23*) 

2.01 
to  2.19 

8.5 

A. 2-41  and 

A. 2-50  and 

A. 2-43 
to  A. 2-48 

Steam  Flow 
(Run  No.  25*) 

2.01 
to  2.21 

8.8 

A. 2-50 
to  A. 2-60 

Steam  Flow 
(Run  No.  27*) 

2.01 
to  1.72 

5.6 

*Run  designation  used  by  Berry  and  Pacey  (13). 
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APPENDIX  B 

LISTINGS  OF  FORTRAN  PROGRAMS  FOR  DIFFERENT  METHODS 

OF  DETERMINING  APPROXIMATE  SYSTEM  TRANSFER  FUNCTIONS 


This  appendix  contains  the  listings  of  all  FORTRAN  programs 
written  for  different  methods  which  have  been  used  in  this  work  to 
determine  approximate  system  transfer  functions,  namely: 


1.  Rosenbrock  Method  in  Time-Domain  (TDROO) 

2.  Bailey  and  Law  Technique  (EDBLO) 

3.  Chen  and  Philip  Technique  (FDCPO) 

4.  Levy  Technique  (FDLOO) 

5.  Staffin  and  Staffin  Technique  (FDSSO) 

6.  Rosenbrock  Method  in  Frequency-Domain  (FDROO) 


Common  subroutines  for  these  programs  are  listed  once.  Sub¬ 
routines  especially  written  for  individual  programs  are  attached  with 


the  main  program. 


h 
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MAINLINE  TDRCO 
MAINLINE  TDROO 


C 

C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 
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c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 
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c 

c 
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*  MAINLINE  TDROO  * 
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PURPOSE 

FIT  THE  TIME-DOMAIN  DATA  BY  SIMPLE  TRANSFER 
FUNCTIONS  USING  ROSENBROCK'S  SEARCH  TECHNIQUES 

DESCRIPTION  OF  PARAMETERS 

NVAR  NUMBER  OF  PARAMETERS  TO  BE  OPTIMIZED 

M  PROGRAM  CONTROL  FLAG 

1  ...  MAXIMIZE  A  FUNCTION 
-1  •••  MINIMIZE  A  FUNCTION 
CONVC  BASE  POINT  CONVERGENCE  RATIO 
ACONS  LOWER  LIMITS  FOR  THE  PARAMETERS 

UCONS  UPPER  LIMITS  FOR  THE  PARAMETERS 

B 1  STARTING  POINT 

STEPS  INITIAL  STEP  SIZE  FOR  THE  PARAMETERS. 

NCASE  NUMBER  OF  SETS  OF  DATA 

WIDTH  PULSE  WIDTH  (MIN. ) 

HIGHT  PULSE  HEIGHT 

NW IDE  NUMBER  OF  DATA  POINTS  UNDER  PULSE 
NUMBR  NUMBER  OF  TRANSIENT  RESPONSES  IN  EACH  SET 
OF  DATA 

NPTS  NUMBER  OF  DATA  POINTS 

NSSPT  NUMBER  OF  STEADY-STATE  DATA  POINTS 

Y  VECTOR  OF  INPUT  DATA 

I  TYPE  CONTROL  FLAG  FOR  THE  TRANSFER  FUNCTION 
GAIN 

1  ...  POSITIVE  GAIN 
-1  ...  NEGATIVE  GAIN 

INDEX  CONTROL  FLAG  FOR  THE  TIME  DELAY 
1  ...  CALCULATE  THE  TIME  DELAY 
-1  ...  DO  NOT  CALCULATE  THE  TIME  DELAY 
ICONT  CONTROL  FLAG  FOR  CALCULATIONS  OF  THE  PULSE 
HEIGHT  AND  WIDTH 
1  ...  CALCULATIONS  REQUIRED 
-1  ...  CALCULATIONS  NOT  REQUIRED 
NRPLS  COLUMN  NUMBER  FOR  THE  FORCING  FUNCTION 

FLTCS  FILTER  CONSTANT  TO  SMOOTH  THE  DATA 

DEAD  TIME  DELAY 

DELT  SAMPLING  TIME  (MIN.) 
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MAINLINE  TDROO  ...(CONT'D) 


USAGE 

ENTER  DATA  AS  REQUIRED 


SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
RBRCK *  ADVCE  *  CONTR  *  DEDTM  *  SOLNS*  FUNC 


DIMENSION  STEPI (5) 

DIMENSION  UCONI (5) *ACONl (5) 

DIMENSION  DATP (400*10) *TITLE(20) 

DIMENSION  DEAD (10) » GAIN (10) *  TAU1 ( 10  ) *TAU2(10) 

COMMON  AXES ( 5  *  5 )  »B1(5) * B2 ( 5  ) »UCONS(5) *ACONS(5) • A ( 5  *  5 ) 

*  *  B  (  5  )  * 

1STEPS ( 5  )  *BASE*BNEW*SUM*CONVC*AM( 5) ♦ A JUMP  *  I FL ( 5 ) *NVAR»M 

*  * SNEW 

COMMON /ALEAS/Y (400  )  *H I GHT * W I DTH • DELT * I ND I C *NPTS ♦ I  TYPE 

*  *  SUMSQ 

1*  NW I DE  *  NSSPT 
COMMON/ T IMED/TDLAY 
DELT  =  0.26666667 
READ  ( 5  » 1  )  NVAR  *  M 

1  FORMAT  (215) 

READ  (5*3)  CONVC 

3  FORMAT  (F10.8) 

READ  (5*2)  (B1 ( I ) *  1  =  1 *5 ) 

2  FORMAT  (5F10.5) 

READ  (5*4)  (ACONI ( I ) *1=1*5) 

READ  (5*4)  (UCONI ( I ) *  1  =  1 *5 ) 

READ  (5*4)  (STEPI ( I ) *1=1*5) 

4  FORMAT  (5F10.3) 


READ  (5*10)  NCASE 

10  FORMAT  (15) 

DO  9999  I CASE= 1  *  NCASE 

READ  (5*11)  WIDTH»HIGHT *NWIDE 

11  FORMAT  (2F 10 .3*15) 

READ  (5*12)  NUMBR *NPTS *NSSPT *  I  TYPE » INDEX  * ICONT *NRPLS 

12  FORMAT  (715) 

READ  (5*14)  ( DEAD ( I ) ♦ I = 1 *NUMBR ) 

14  FORMAT  (5F10.3) 

READ  (5*15)  FLTCS 

15  FORMAT  (F10.3) 


WRITE  (6*50) 

50  FORMAT ( 1H1 *20X »' ROSENBROCK  S  SEARCH 
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MAINLINE  TDROO  •••(CONT'D) 

WRITE  (6*51)  NVAR 

51  FORMAT  ( 1H0  » 1QX ♦ 'DIMENSIONS  OF  SPACE  »*I3) 

WRITE  (6*52)  M 

52  FORMAT  ( 1H0 * 10X * ' CR I  TER  I  ON  -  MAXIMIZE  (  +  1)  ♦  MINIMIZE 
*  (-1) ' *15) 

WRITE  (6*53)  CONVC 

53  FORMAT  ( 1HO * 1QX * ' BASE  POINT  CONVERGENCE  RAT  I  0 '  * F14. 8 ) 
WRITE  (6*54) 

54  FORMAT  < ///11X* 1  INITIAL  BASE  POINT1) 

WRITE  (6*55)  (  B  1  (  I  )  *  I  =  1  *  NVAR ) 

WRITE  (6*56) 

56  FORMAT  (/// 11X*  'BASIC  STEP  SIZES') 

WRITE  (6*55)  ( STEP  I ( I )  *  I  =  1  *  NVAR ) 

WRITE  (6*57) 

57  FORMAT  (/// 1 IX *' UPPER  CONSTRAINTS') 

WRITE  (6*55)  (UCONI ( I ) *I=1*NVAR) 

WRITE  (6*58) 

58  FORMAT  (/// 1 IX *' LOWER  CONSTRAINTS') 

WRITE  (6*55)  (A CONI ( I ) *  1  =  1  * NVAR) 

55  FORMAT  (15X*F12.5) 

WRITE  (6*70) 

70  FORMAT  ( 1H1 ) 


READ  (5*16)  ( T I TLE ( J ) * J=1 *20 ) 

16  FORMAT  (20A4) 

DO  1000  I  =  1 *NPTS 

READ  (5*100)  (DATP( I *J) *J=1*NUM3R) 
100  FORMAT  (10F8.3) 

1000  CONTINUE 

IF(ICQNT)  1010*1100*9999 
1010  CONTINUE 

C  COMPUTE  PULSE  HEIGHT  AND  WIDTH 

WIDTH  =  NWIDE*DELT 


IBGIN  =  NSSPT+l 
IENDT  =  IBGIN+NWIDE 
SUMS  =  0*0 
DO  1074  1=1 *NSSPT 

SUMS  =  SUMS+DATP ( I *NRPLS ) 
1074  CONTINUE 

SSVAL  =  SUMS/FLOAT ( NSSPT ) 
SUMH  =  0*0 

DO  1030  I=IBGIN* IENDT 
SUMH  =  SUMH+DATP ( I *NRPLS ) 
1030  CONTINUE 

SUMH  =  SUMH/ ( NW IDE+1 ) 
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MAINLINE  TDROO  •••(CONT'D) 

HIGHT  =  SUMH-SSVAL 
WRITE  (6*981)  HIGHT  »W I DTH 

981  FORMAT  ( ///IX »' PULSE  HEIGHT  IS  = • » F 10 . 3 ♦ 5X * ' PULSE 
*  WIDTH  IS  = '  *  F10 • 

13) 

1100  CONTINUE 

C  CALCULATE  DEAD  TIME  »  GAIN  *  TAU1  *  TAU2  OF  THE 

C  TRANSFER  FUNCTION 

DO  4000  NUMB= 1  *  NUMBR 
DO  3841  1=1 *NVAR 

STEPS (  I  )  =  STEPI  (  I  ) 

3841  CONTINUE 

DO  5723  1  =  1  *  NVAR 

UCONS ( I )  =  UCONI ( I ) 

5723  CONTINUE 

DO  5727  1  =  1  *  NVAR 
ACONS ( I )  =  ACONI  ( I  ) 

5727  CONTINUE 

IF ( NUMB-3 )  3374*3373*3374 

3373  CONTINUE 

I  TYPE  =  -  I  TYPE 

3374  CONTINUE 

C  NO  CALCULATION  FOR  THE  FORCING  FUNCTION 

IF (NUMB-NRPLS)  3500*4000*3500 
3500  CONTINUE 

DO  3510  I  =  1  * NP TS 
Y ( I )  =  DATP ( I >NUMB ) 

3510  CONTINUE 

C  CALCULATE  STEADY  STATE  VALUE 

SUMSS  =  0.0 
DO  3550  K= 1 *NSSPT 
SUMSS  =  SUMSS+Y ( K ) 

3550  CONTINUE 

SSVAL  =  SUMSS/FLOAT (NSSPT ) 

C  SUBSTRACT  OUT  STEADY  STATE  VALUE 

DO  3560  K= 1  *  NP  TS 
Y ( K )  =  Y ( K ) -SSVAL 
35b0  CONTINUE 

REDUCE  NOISE  EFFECT  -  USE  FILTER  CONSTANT  TO  SMOOTH 
THE  RESPONSE 
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MAINLINE  TDROO  •••(CONT'D) 

FILTR  =  1 • 0-FLTCS 
DO  3540  I =2  » NP TS 
Y ( I )  =  FLTCS*Y( 1-1 )+FlLTR*Y( I ) 

3540  CONTINUE 

WRITE  (6*34) 

34  FORMAT  (  / //30X  »  •  RESPONSE  *#**'/) 

WRITE  (6*35)  ( Y ( K )  *K=1 *NPTS ) 

35  FORMAT  (4X.9F8.3) 

WRITE  (6*36)  SSVAL 

36  FORMAT  ( //21X» •  INITIAL  STEADY  STATE  VALUE  IS'iFlO.4//) 

IF  INDEX  EQUAL  TO  ZERO  »  NO  CALCULATION  OF  THE  TIME 
DELAY 

I F ( INDEX  )  3530*3530*3520 
3520  CONTINUE 

CALCULATE  THE  TIME  DELAY  USING  SUBROUTINE  DEDTM 

CALL  DEDTM 
DEAD  (NUMB)  =  TDLAY 
3530  CONTINUE 

NDELY  =  DEAD ( NUMB ) /DELT 

COMPUTE  THE  GAIN  AND  TIME  CONSTANTS  FOR  THE 
TRANSFER  FUNCTION 

INDIC  ■  NSSPT+NDELY 
CALL  RBRCK 
GAIN(NUMB)  =  B2 ( 1  ) 

TAU1 ( NUMB )  =  B2 ( 2  ) 

TAU2 ( NUMB )  =  B2 ( 3  ) 

4000  CONTINUE 

WRITE  (6.60)  (TITLE( I )  *  1  =  1  *20  ) 

60  FORMAT  (1H1///20A4) 

WRITE  (6*61) 

61  FORMAT  ( ///27X *• PROCESS  PARAMETERS • /27X * ' - 

*  - i//) 

WRITE  (6*62) 

62  FORMAT  ( 1H0 * 19X * • T IME  DELAY ' * 8X * ' GA I N '  *  1 IX  * ' TAU1 '  ♦ 10X 

*  * ' TAU2 1 // ) 

DO  65  I  =  2  ♦  NUMBR 

J  =  1-2  , 

WRITE  (6*63)  J*DEAD( I ) *GAIN ( I ) *TAU1 ( I ) *TAU2 ( I ) 

63  FORMAT  ( 1HQ *7X » ' PLATE  *  ♦ I  3 *4F14.6 ) 

65  CONTINUE 

9999  CONTINUE 
STOP 
END 
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SUBROUTINE  DEDTM 
SUBROUTINE  DEDTM 


C 

C 

C  SUBROUTINE  DEDTM 

C  - 

c 

c 

C  PURPOSE 

C  DETERMINE  THE  TIME  DELAY  OF  ANY  SYSTEM  FROM  ITS 

C  TRANSIENT  RESPONSE  BY  OLDENBOURG  AND  SARTORIUS* 

C  METHOD 

C 

C  USAGE 

C  CALL  DEDTM 

C 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  NONE 

C 

C  REFERENCE 

C  OLDENBOURG*  R.C.*  AND  SARTORIUS*  H.»  'THE  DYNAMICS 

C  OF  AUTOMATIC  CONTROL'*  AMERICAN  SOCIETY  OF 

C  MECHANICAL  ENGINEERS*  MEW  YORK*  (1946) 

C 

c 

COMMON/ ALE AS /Y ( 400 ) *H I GHT . W I DTH * DELT *  I ND I C *NPTS ♦ I  TYPE 
*  * SUMSQ 

1*  NW I DE  *  NSSPT 
COMMON/ T IMED/TDLAY 

C  EVALUATE  MAXIMUM  DERIVATIVE  OF  THE  RESPONSE 

NDUM  =  NW  I  DE/2 
I  END  =  NW I DE+NSSPT+NDUM+1 
DESAV  =  0.0 


IBGIN  =  NSSPT+1 
DO  1202  I*IBGIN*IEND 

DERI  ■  3 • 0* ( Y ( I +  3 ) -Y ( I -3 ) ) +2 • 0* ( Y ( I +2 ) -Y ( 1-2 )  ) +Y (  1  +  1  ) 
*-Y( 1-1) 

IF  ( I  TYPE )  1204*1204*1203 

1203  CONTINUE 

IF (DERI -DESAV)  1202*1202*1205 

1204  CONTINUE 

I F ( DER I “DESAV )  1205*1205*1202 

1205  CONTINUE 
I  MAX  =  I 
DESAV  =  DERI 
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SUBROUTINE  DEDTM  •••(CONT'D) 


1202  CONTINUE 

WRITE  (6*15)  I  MAX  •  Y ( I MAX ) 

15  FORMAT  ( 1H0 * 10X *  1  MAXIMUM  DERIVATIVE  AT  '*15*'  VALUE 
*  IS  '  * F 14 • 5  ) 

C  CALCULATE  TIME  DELAY 

AMAXD  =  DESAV/2  8 • 0 
ATST  =  Y ( I MAX ) /AMAXD+O  #50 
I TST  =  ATST 
JTST  =  IMAX-ITST 

DUMY  =  Y ( JTST ) +Y ( JTST+1 )  +  Y ( JTST-1 ) 

DUMMI  =  DUMY/3.0 
DUVA  =  DUMM 1*2*718 
ZDE  =  DUVA/AMAXD+0.50 
SAT  =  ZDE+ATST 
ISAT  =  SAT 

NDELY  =  IMAX-NSSPT-ISAT 
IF  (NDELY)  1500*1500*1501 

1500  CONTINUE 
NDELY  =  0 

1501  CONTINUE 

TDLAY  =  NDELY* DELT 


WRITE  (6*20)  TDLAY 

20  FORMAT  (  1H0  *  10X  *  '  T  IME  DELAY  IS  =  SF15.4) 
RETURN 
END 
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SUBROUTINE  RBRCK 
SUBROUTINE  RBRCK 


C 

C 

C  SUBROUTINE  RBRCK 

C  - 

c 

c 

C  PURPOSE 

C  OPTIMIZE  A  FUNCTION  BY  VARYING  ITS  PARAMETERS 

C 

C  USAGE 

C  CALL  RBRCK 

C 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  ADVCE  *  CONTR  *  SOLNS ♦  FUNC 

C 

C  METHOD 

C  ROSENBROCK'S  HILL  CLIMBING  METHOD 

C 

C  REFERENCES 

C  ROSENBROCK »  H.H.»  AND  STOREY  *  C.»  ‘COMPUTATION 

C  TECHNIQUES  FOR  CHEMICAL  ENGINEERS 1  »  PERGAMON  PRESS * 

C  NEW  YORK *  ( 1966) . 

C  WILDE*  D.J.*  'OPTIMUM  SEEKING  METHODS'*  PRENTICE 

C  HALL*  NEW  JERSEY*  (1964). 

C 

C 

COMMON  AXES (5 *5)  *B1(5)  *B2(5) *UCONS(5) *ACONS(5) * A ( 5  *  5 ) 
**B(5)  * 

1ST  EPS ( 5 )  *BASE*BNEW»  SUM  *  CON VC  *  AM ( 5 ) *  A JUMP  *  I F  L ( 5 ) *NVAR»M 
**SNEW 
KSTEP  =  0 
KROTN  =  0 
NSUCS  =  0 
NFAIL  =  0 
I  JUMP  =  0 
AJUMP  =  1.0 

C  SET  UP  ORTHOGONAL  AXES 

DO  1000  1  =  1  *  NVAR 

DO  1000  J= 1  *  NVAR 

AXES ( I *J)  *  0.0 

1000  CONTINUE 

DO  1001  1  =  1  *  NVAR 

AXES ( 1*1)  =  1.0 

1001  CONTINUE 
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c 

SUBROUTINE  RBRCK  •••(CONT'D) 

STARTING  POINT 

1004 

DO  1004  I  =  1 *  NVAR 

B  2 ( I )  =  Bl(I) 

CONTINUE 

C 

EVALUATE  THE  FUNCTION  AT  THE  BASE  POINT 

100 

BASE  =  FUNC (NVAR *B2 ) 

WRITE  (6*100)  BASE 

FORMAT  (  1H0*8X* •  INITIAL  BASE  PO I  NT « / 1 2X > *1 NI T I AL 

*  FUNCTION  VALUE  IS 
1 1  *  E16 • 8 / /  ) 


CONVC  =  CONVC*16 • 0 

1002 

CONTINUE 

BN  EW  =  BASE 

1999 

CONTINUE 

DO  1003  1=1 *NVAR 

AM ( I )  =  3*0 

I FL  <  I  )  =  0 

1003 

CONTINUE 

DO  1007  K=  1  *  NVAR 

CALL  ADVCE(K) 

CALL  CONTR 

KSTEP  =  KSTEP+1 

SNEW  =  FUNC ( NVAR  *  B2 ) 

WRITE  (6*101)  KROTN»KSTEP*B2(l) * B2 ( 2 ) * B2 ( 3 ) *SNEW 

I F ( M* ( BNEW-SNEW )  )  1005  *1006  *  1006 

C 

SUCCESS 

1005 

CONTINUE 

BNEW  =  SNEW 

GO  TO  1007 

C 

FAILURE 

1006 

AM  (  K  )  =  -AMU) 

CALL  ADVCE(K) 

KSTEP  =  KSTEP+1 

1007 

1020 

CONTINUE 

CONTINUE 

C 

SET  CHECK  VALUE  TO  ZERO  FOR  JUMP  CONVERGENCE 

ICHEK  =  0 

C 

GO  ON  UNTIL  AT  LEAST  ONE  TRIAL  HAD  BEEN  SUCCESSFUL 
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SUBROUTINE  RBRCK  ...(CONT’D) 

C  IN  EACH  DIRECTION  AND  ONE  HAD  FAILED 

DO  2020  Ka  1 *  NVAR 

C  CHECK  WHETHER  THE  INCREASE  INSTEP  SIZE  IS  TWO  SMALL 

I F ( ABS ( AM ( K ) ) -0 • 80 )  2001*2002*2002 
2001  CONTINUE 


ICHEK  =  ICHEK+1 
GO  TO  2020 

2002  CONTINUE 
CALL  ADVCE(K) 

CALL  CONTR 
KSTEP  =  KSTEP+1 
SNEW  =  FUNC ( NVAR  * B2 ) 

WRITE  (6*101)  KROTN*KSTEP*B2( 1 ) * B2 ( 2 )  ♦ B2  (  3  )  * SNEW 
101  FORMAT  (7X*2I8*4E15.5) 

C  CHECK  IF  THE  NEW  TRIAL  IS  SUCCESSFUL 

IF(MMBNEW-SNEW)  )  2003  *2010*2010 

2003  CONTINUE 

C  SUCCESSFUL  -  TREBLE  STEP  SIZE 

I F (  ABS ( BNEW-SNEW ) -3 • 0*CONVC )  2009*2004*2004 

2004  CONTINUE 

I  F ( IFL(K)  )  2005.2005*2006 

2005  CONTINUE 

AMU)  =  3  •  0*AM  (  K  ) 

2006  CONTINUE 
BNEW  =  SNEW 
GO  TO  2015 

2009  CONTINUE 

AMU)  *  0  •  50#AM  (  K  ) 

BNEW  a  SNEW 
GO  TO  2015 

2010  CONTINUE 

C  FAILURE  -  MULTIPLY  STEP  SIZE  BY  -0.50 

AMU)  =  -AMU) 

CALL  ADVCE(K) 

AMU)  =  0  •  50#AM  (  K  ) 

IFL(K)  =  1 
2015  CONTINUE 

CHECK  WHETHER  STEP  SIZE  IS  TOO  LARGE 
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SUBROUTINE  RBRCK  •••(CONT'D) 

IF(ABS(AM(K))-18#0)  2020*2020*2016 
2016  CONTINUE 

AM ( K )  =  18*0#AM(K)/ABS(AM(K) ) 

2020  CONTINUE 

IF ( ICHEK-NVAR )  1020*2500*2500 

C  CHECK  WHETHER  PROGRESS  HAD  BEEN  MADE  OR  NOT 

2500  CONTINUE 

I F ( M# ( BASE-BNEW ) )  2510*2501*2503 

2501  CONTINUE 

C  NO  PROGRESS  WHATSOEVER 

I  JUMP  =  I JUMP  + 1 
DO  2502  K= 1 *NVAR 
AM ( K )  =  1  •  50 / I  JUMP 
IFL(K)  =  0 

2502  CONTINUE 


I F ( I  JUMP- 2 )  1003  *1003  *2520 

2503  CONTINUE 
NSUCS  =  NSUCS+1 
I  JUMP  =  0 

I F ( NSUCS-2 )  2504.2510*2510 

2504  CONTINUE 
GO  TO  1999 

2510  CONTINUE 
NSUCS  =  0 
I  JUMP  =  0 

IF (M* ( BASE-BNEW )+CONVC )  4010*2506*2506 
2506  CONTINUE 

NFAIL  =  NFAIL+1 
WRITE  (6*200)  NFAIL 

200  FORMAT  ( 1H0*8X* '**#*INSIGNIFICANT  MOVE  -  NFAIL  I S  » I  3  * • 
***** i  ) 

IF (N FAIL-2)  4020*2520*2520 
2520  CONTINUE 

REDUCE  INITIAL  STEP  SIZE  BY  HALF  AND  TRY  AGAIN  FROM 
THE  INITIAL  BASE  POINT 

NFAIL  =  0 
I JUMP  =  0 
AJUMP  =  A JUMP /2 • 0 
CONVC  =  CONVC/2.0 
IF ( AJUMP-0  «050 )  8000*8000  *4000 
4000  CONTINUE 

BNEW  =  BASE 
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SUBROUTINE  RBRCK  ...(CONT'D) 

DO  4001  K= 1  *  NVAR 
B2 ( I )  =  Bl(I) 

4001  CONTINUE 

WRITE  (6*400) 

400  FORMAT  ( 1H0 * 8X * ' ****STEP  SIZE  HAS  BEEN  REDUCED  BY  HALF 
■«•**#*  •  ) 

GO  TO  1002 
4010  CONTINUE 
NFAIL  =  0 
4020  CONTINUE 


KROTN  =  KROTN+1 

ROTATION  OF  AXES  USING  GRAM-SCHMIDT 
ORTHOGONAL  I ZAT I  ON  PROCESS 

REFERENCE  -  WILDE'S  OPTIMUM  SEEKING  METHOD*  PAGE  156 


EQUATION  5-16 A 

DO  8500  1=1 *NVAR 

A (  1  *  I  )  =  B2 ( I )-Bl ( I ) 

8500  CONTINUE 

C  EQUATION  5-16C 

DO  8502  1  =  2  * NVAR 

I M 1  =  1-1 
DO  8501  J= 1  *  I Ml 
A (  I  » J  >  =  0.0 

8501  CONTINUE 

DO  8502  J= I  ♦  NVAR 
A  <  I  *  J  )  -  A  (  1  *  J  ) 

8502  CONTINUE 

C  EQUATION  5-17 

SUMA  =  0.0 

DO  8503  J= 1  *  NVAR 

SUMA  =  SUMA+A ( 1  * J ) *A ( 1  * J ) 

8503  CONTINUE 

DO  8504  J= 1  *  NVAR 

AXES ( 1  *  J )  =  A ( 1  *  J ) /SQRT (SUMA) 

8504  CONTINUE 

C  EQUATION  5-21 

DO  8508  I  =2  *NVAR 

SUMA  =  0.0 
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SUBROUTINE  RBRCK 


... (CONT'D) 


DO  8505  J=1»NVAR 

SUMA  =  SUMA+AXES ( 1-1 • j ) #A ( I »J) 

8505  CONTINUE 

DO  8506  J=1*NVAR 

B(J)  =  A (  I  * J ) -AXES ( 1-1 > j ) #SUMA 

8506  CONTINUE 


SUMS  =  0.0 
DO  8507  J  = 1  * N V A R 
SUMB  =  SUMB+B ( J ) *3 ( J ) 
8507  CONTINUE 


DO  8508  Js 1  * NVAR 

AXES (  I  »  J  5  =  B( J) /SORT (SUMB) 

8508  CONTINUE 

C  END  OF  THIS  PART  OF  ROTATION  OF  AXES 

C  REDEFINE  BASE  POINT 

BASE  =  BNEW 
DO  8100  K=  1  * NVAR 
B1(K)  =  B  2 ( K ) 

8100  CONTINUE 

GO  TO  1002 

8000  CALL  SOLNS ( KROTN  t  KSTEP ) 

RETURN 

END 
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SUBROUTINE  ADVCE 
SUBROUTINE  ADVCE ( K ) 

C  SUBROUTINE  ADVCE 

C  - 

c 

c 

c  PURPOSE 

C  DETERMINE  NEW  VALUES  FOR  EACH  VARIABLES 

C 

C  DESCRIPTION  OF  PARAMETERS 

C  K  VARIABLE  NUMBER 

C 

C  USAGE 

C  CALL  ADVCE  (K) 

C 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  NONE 

C 
C 


COMMON  AX  ES ( 5  *  5 )  »  B 1  (  5  )  »B2(5)  *UCONS( 5 )  >ACONS( 5 ) *A  t  5  *5  ) 
**B(5)  * 

1  ST  EPS ( 5 )  *  B ASE  *  BNEW  »SUM  *CONVC  * AM ( 5 )  *  A JUMP* IFL(5 )  *NVAR  *M 
*»SNEW 

DO  100  1  =  1  *  NVAR 

B2(I)  =  B2 ( I )+STEPS( I )*AXES( I *K ) *AM ( K ) *A JUMP 
100  CONTINUE 
RETURN 
END 


c  I  - 


(  a  «  C  )  A  « 
*  -A'  «  ( 


-OVOA  I T 2 

onsovaA  simuopaue 

3^'ITUOPeUS 
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22CWw- 

I 

aJB’INA flAq  30  »0ITqi*023C 
«-l6vu^  3J6AI9AV  > 
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(a  )e/,ooA*  (c )2.  cou*  (a)sa.  (2)iaf  ( e»e)83XA  roMMoo 
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W3/2t* 

pavh«i*i  ooi  oa 
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SUBROUTINE  CONTR 
SUBROUTINE  CONTR 


C 

C 

C  SUBROUTINE  CONTR 

C  - 

c 

c 

C  PURPOSE 

C  INSERT  CONSTRAINTS  ON  THE  PARAMETERS  TO  BE 

C  OPTIMIZED 

C 

C  USAGE 

C  CALL  CONTR 

C 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  NONE 

C 

C  REFERENCE 

C  ROSENBROCK »  H.H..  AND  STOREY  >  C.»  ’COMPUTATION 

C  TECHNIQUES  FOR  CHEMICAL  ENGINEERS’.  PERGAMON  PRESS. 

C  NEW  YORK*  ( 1966  )  . 

C 

c 


COMMON  AXES ( 5  *  5 )  *  B1 ( 5 )  *32(5) »UCONS(5) »ACONS(5) »A(5.5> 

*  *  B  (  5  )  * 

1STEPS ( 5 ) *BASE*BNEW*SUM»CONVC»AM( 5 ) » A JUMP. I  FLU) .NVAR.M 

*  *  S  N  E  W 
ICHEK  =  0 


DO  100  1  =  1*  NVAR 

I F  <  B2  < I ) -UCONS ( I  )  )  102*101.101 

101  CONTINUE 

B2 ( I )  =  UCONS ( I ) 

AMU  )  =  -0#50*AM(  I  ) 

ICHEK  =  ICHEK+1 
•  GO  TO  100 

102  CONTINUE 


I F ( B2 ( I ) — ACONS ( I  )  )  103.103.100 

103  CONTINUE 

B2 ( I )  =  ACONS ( I ) 

AM ( I )  =  -0 • 50#AM ( I ) 

ICHEK  =  ICHEK+1 
ICO  CONTINUE 

IF ( ICHEK-NVAR )  104.105.105 
105  CONTINUE 


9T  :0  VITUCPSUE 


J2 
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#  (e><  . 
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SUBROUTINE  CONTR  ...(CONT'D) 

WRITE  (6*110)  KSTEP 

110  FORMAT  (1H0*‘***  ALL  VARIABLES  AT  CONSTRAINTS  AFTER 
*  JUMP  *  *15/) 

BNEW  =  FUNC ( NVAR  » B2  ) 

CALL  SOLNS(KROTN*KSTEP) 

STOP 

104  CONTINUE 
RETURN 
END 
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(  C  •  T :iC3  )  .  •  .  -'"  CO  3/.  1  TU0PGU2 


Q3T8>  ( 01 1 »  d )  3TIPW 

h  ,  aT/  v  ..oo  *>  v  1  ****«!. hi)  tavb'o^  r;i. 

{ \S I v  *  qMUL  * 

)T2>tWTOH>)2/J0S  J J A0 


qoTa 

3UH I THO0  *01 
HflUTB* 


ana 


. 


B-  18 


SUBROUTINE  SOLNS 
SUBROUTINE  SOLNS ( KROTN » KSTEP ) 


C 

C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


SUBROUTINE  SOLNS 


PURPOSE 

WRITE  OUT  THE  FINAL  POINT  AND  THE  FINAL  FUNCTION 
VALUE 


DESCRIPTION  OF  PARAMETERS 

KROTN  NUMBER  OF  AXES  OF  ROTATION 

KSTEP  NUMBER  OF  STEPS  FORWARD 


USAGE 

CALL  SOLNS  ( KROTN »  KSTEP) 


SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
NONE 


COMMON  AX 

*  *  B  (  5  )  * 

1  ST  EPS  (  5  )  * 

*  * SNEW 
WRITE  ( 6  » 

100  FORMAT ( 1H 
WRITE  ( 6  * 
110  FORMAT  ( 1 


ES ( 5  * 5 )  »  B 1  (  5  )  *32(5) 
BASE*BNEW  »SUM  » CON VC 
100) 

1  *  / /3QX  »  'ROSENBROCK 

no ) 

H  0  *  1 0  X  ♦  ‘CONVERGENCE 


UCONS ( 5 ) * ACONS ( 5 ) *A(5*5) 
AMO)  *  A  JUMP  *  I  FL  (  5  )  ♦  NVAR  *  M 

S  SEARCH  TECHNIQUE1//) 
CRITERION  IS  SATISFIED* ) 


WRITE 

120  FORMAT 
WRITE 

130  FORMAT 
WRITE 

140  FORMAT 
WRITE 

130  FORMAT 


(6*120)  KROTN 

( 1H0  * 10X  » I  10  *  '  AXES  OF  ROTATION*) 
(6*130)  KSTEP 

( 1H0  * 10X  »  1 10  *  *  STEPS  FORWARD') 
(6*140) 

( 1H0  *  1  OX  * 'FINAL  POINT  IS  * ) 

(6  *  130)  ( 62 (  I  ) *  I  =  1  *  NVAR ) 

( 1H0  ♦  10X  *3E16*8 ) 


WRITE 

160  FORMAT 
WRITE 

170  FORMAT 
WRITE 

180  FORMAT 


(6*160) 

( 1H0 ♦ 10X  * 'FINAL 
(6*170)  BNEW 
(1H0*15X*E16.8) 
(6*180) 

(  1 H 1  ) 


FUNCTION  VALUE ' ) 
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SUBROUTINE  SOLiNS  •••(CONT'D) 

RETURN 

END 


w  -a 


(Q'TkWD)...  £*  .  £  3 I  TUOH  9U£ 


HAUT3H 

Q/,3 


X 


. 


B 


20 


FUNCTION  FUNC 
FUNCTION  FUNC (NVAR#B2 ) 


C 

C 

C 

C 

C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


FUNCTION  FUNC 


PURPOSE 


COMPUTE  THE  VALUE  OF  THE  FUNCTION  TO 
THE  MODEL  IS  THAT  OF  TWO  FIRST  ORDER 
FUNCTIONS  IN  SERIES 

FORCING  FUNCTION  -  RECTANGULAR  PULSE 


BE  OPTIMIZED 
TRANSFER 


DESCRIPTION 

NVAR 

B2 


OF  PARAMETERS 

NUMBER  OF  PARAMETERS  TO  BE  OPTIMIZED 
VALUES  OF  THE  RESPECTIVE  PARAMETERS 


SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
NONE 


COMMON / ALE AS /Y ( 400 ) »H I GHT  * W I DTH * DELT  *  I ND I C ♦ NPTS *  I T YPE 
*  tSUMSQ 

1*  NW IDE* NSSPT 
DIMENSION  B2(5) 

GAIN  =  B2 ( 1 ) 

TAU1  =  B  2 ( 2 ) 

TAU2  =  B2 ( 3 ) 

TIME  =  0.0 

SUMSQ  =  0.0 

DO  100  I  =  I  ND I C  *  NPTS 

IF ( TIME-WIDTH)  250»250»251 

250  CONTINUE 
U  =  0-0 
GO  TO  252 

251  CONTINUE 
U  =  1.0 

252  CONTINUE 
T2MT1  =  TAU2-TAU1 
RAPT1  =  TAU1/T2MT1 
RAPT2  =  TAU2/T2MT1 
TIMA  =  TIME-WIDTH 
EXPRT  =  1.0+RAPT1*EXP 

#/T AU2  ) 

EXPRS  =  1 .Q+RAPT1*EXP 
*/TAU2 ) 

1-U*EXPRT 

AMODL  =  HIGHT*GAIN*EXPRS*ITYPE 


(-TIMA/TAU1 ) -RAPT 2*EXP( -TIMA 
(-TIME/TAU1 ) -RAPT 2*EXP( -TIME 
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FUNCTION  FUNC 

TIME  =  TIME+DELT 
SUMSQ  =  SUMSQ+ ( Y ( I ) -AMODL ) **2 
100  CONTINUE 

FUNC  =  SUMSQ 

RETURN 

END 


. ( CONT ' D ) 
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MAINLINE  FDBLO 
MAINLINE  FDBLO 


C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

0 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 
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*************  ************ 


*  * 

*  MAINLINE  FDBLO  * 

*  -  * 

*  * 


************************* 


PURPOSE 

FITTING  FREQUENCY-DOMAIN  DATA  BY  FIRST*  SECOND  OR 
THIRD  ORDER  TRANSFER  FUNCTION 

DESCRIPTION  OF  PARAMETERS 

NCASE  NUMBER  OF  SETS  OF  DATA  TO  BE  FITTED 
I  FLAG  PROGRAM  CONTROL  FLAG 

1  ...  FIT  THE  DATA  BY  OVERDAMPED 
TRANSFER  FUNCTIONS  SUCH  AS  FIRST*  SECOND 
OR  THIRD  ORDER 

-1  ...  FIT  THE  DATA  BY  AN  UNDERDAMPED 
SECOND  ORDER  TRANSFER  FUNCTION 

NFQ  NUMBER  OF  DATA  POINTS 

GAIN  GAIN  OF  THE  TRANSFER  FUNCTION 

OMEGA  FREQUENCY 

AMAT  MAGNITUDE  OF  THE  BODE  PLOT 

USAGE 

ENTER  DATA  AS  REQUIRED 


REMARKS 

GAIN  OF  THE  TRANSFER  FUNCTION  SHOULD  BE  KNOWN 


DIMENSION  OMEGA ( 50 ) * AMAG ( 50 ) » AMAT ( 50 ) 
READ  (5*1)  NCASE 
1  FORMAT  (13) 

DO  1000  K=  1  *  NCASE 
READ  (5*1)  I  FLAG 


C  READ  IN  DATA 

READ  (5*2)  NFQ*  GAIN 

2  FORMAT  ( 15*  F10.3) 

READ  (5*3)  (OMEGA(IW) *AMAT(IW)*IW=1#NFQ) 

3  FORMAT  ( 10X*F9.4*17X*F9.4) 

DO  333  KL= 1  *  NFQ 
AMAG(KL)  =  AMAT ( KL  ) /GAIN 
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MAINLINE  FDBLO  ...(CONT'D) 

333  CONTINUE 


DETERMINE  WHICH  SUBROUTINE  IS  TO  BE  CALLED  BL123 
OR  BLUND 


IF  ( I  FLAG  )  200  ♦  200  ♦  202 
200  CONTINUE 

C  UNDERDAMPED  -  CALL  BLUND 

CALL  BLUND  ( OMEGA » AMAG * NFQ ) 
GO  TO  1000 
202  CONTINUE 

C  OVERDAMPED  -  CALL  BL123 

CALL  BL123  ( OMEGA  * AMAG # NFQ ) 
1000  CONTINUE 
STOP 
END 
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SUBROUTINE  3L123 

SUBROUTINE  BL123  ( OMEGA  * AMAG * NFQ ) 


C 

C 

C  SUBROUTINE  BL123 

C  - 

C 

C 

C  PURPOSE 

C  FIT  THE  FREQUENCY-DOMAIN  DATA  BY  OVERDAMPED 

C  TRANSFER  FUNCTIONS  SUCH  AS  FIRST*  SECOND  OR  THIRD 

C  ORDER 

C 

C  DESCRIPTION  OF  PARAMETERS 

C  OMEGA  FREQUENCY 

C  AMAG  AMPLITUDE  RATIO 

C  NFQ  NUMBER  OF  DATA  POINTS 

C 

C  USAGE 

C  CALL  BL123  ( OMEGA # AMAG * NFQ ) 

C 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  SOLEQ 

C 

C  METHOD 

C  BAILEY  AND  LAW’S  NON  LINEAR  REGRESSION  TECHNIQUE 

C 

C  REFERENCE 

C  BAILEY*  R.V.*  AND  LAW*  V.J.*  ‘A  METHOD  FOR  THE 

C  DETERMINATION  OF  APPROXIMATE  SYSTEM  TRANSFER 

C  FUNCTION’ »  CHEMICAL  ENGINEERING  SCIENCE*  VOL.  18* 

C  PP.139-202*  (1963). 

C 

C 

c 


DIMENSION  OMEGA ( 50 ) *OMEG2 ( 50 ) * AMAG ( 50 ) 

DIMENSION  FTER1 ( 50 ) *FPHl ( 50 ) * FERR (50)*FZ1(50) 
DIMENSION  FERS2(1Q0) *FT12(100) 

DIMENSION  STER1 ( 50  )  *STER2 ( 50 ) *SPHI ( 50 ) *SERR ( 50 ) 
**SZ1 ( 50 ) * 

1SZ2 ( 50  ) 

DIMENSION  SA( 10*20 ) *SC( 10*10) 

DIMENSION  SERS2(100)*ST12(100)*ST22(100) 

DIMENSION  TTER1 (50)  *TTER2(50) *TTER3(50) ♦ T PH I (50) 
**TERR (50  )  * 

1  TZ1 ( 50 ) *  TZ2 ( 50 ) *TZ3 ( 50 ) 

DIMENSION  TA ( 10 *20 ) *TC ( 10 *10) 

DIMENSION  TERS2(100)  *TT12 ( 100 ) *TT22 ( 100) *TT32(10Q) 
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SUBROUTINE  BL123  •••(CONT'D) 


FIT  THE  AMPLITUDE  RATIO  DATA  BY  FIRST  ORDER 
TRANSFER  FUNCTION 

FT  1 2 ( 1 )  =  100.0 
IFP  =  1 

WRITE  (6.5206) 

5206  FORMAT  (1H1) 

1000  CONTINUE 

WRITE  (6*5205)  IFP 

5205  FORMAT  ( ///8X .' TRIAL  NUMBER  ' 13//) 

A  MAXIMUM  OF  20  INITIAL  GUESSES  IS  PERMITTED 

IFIIFP-20)  5204.5204*1998 
1998  CONTINUE 

WRITE  (6.5207) 

5207  FORMAT  ( / / /9 X  .  ' F A  I  LED  TO  CONVERGE  TO  A  PHYSICALLY 
*  REALIZABLE  SOLUT 

1 1  ON  AFTER  10  TRIALS' ) 

GO  TO  1999 
5204  CONTINUE 
ITF  =  1 

START  THE  ITERATION  PROCEDURE 


FERS2 (ITF)  =  0.0 

DO  1001  IW=1.NFQ 

OMEG2 ( I W )  =  OMEGA ( I W ) *OMEGA ( I W ) 

FTERl(IW)  =  FT12<ITF)*OMEG2(IW)+1.0 
FPHI(IW)  =  1.0/SQRT( ABS( FTER1 ( IW) ) ) 

FERR(IW)  =  AMAG ( I W ) -FPHI ( I W ) 

FERS2 (ITF)  =  FERS2 ( ITF )+FERR( IW)*FERR( IW) 

1001  CONTINUE 
WRITE  (6.148) 

148  FORMAT ( 10X *' ITERATION' »7X .'( TAU1 )**2 ' *8X * 'SUM  OF 
*  ERRORS'//) 

1002  CONTINUE 

WRITE  (6.149)  ITF.FT12 ( ITF) .FERS2( ITF) 

149  FORMAT  ( 1H0 . 1 2X » I  3 . 5X . E 1 5 • 6 »4X , E 1 5 . 6 ) 

ALPHA  =  1.0 

BETA  =  0.25 
FC1  =0.0 
FZ 12  =  0.0 


DO  1003  I W  = 1  *  N  F  Q 

OMEG2 ( I W )  =  OMEGA ( IW ) *QMEGA ( I W ) 

FTERl(IW)  =  FT12 ( ITF)*OMEG2 ( I W ) +1 • 0 
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SUBROUTINE  BL123  • • . ( CONT ' D ) 

FPHI(IW)  r  1.0/SQRT (ABSIFTERl ( IW) ) ) 
FERR(IW)  =  AM AG ( I W ) -FPHI ( I W ) 

FZl(IW)  =  -C • 5Q*OMEG2 ( I W ) *FPH I ( I W ) **3 
FZ 12  =  FZ12+FZ1 ( I W)#FZ1 ( IW) 

FC1  =  FC1+FERR ( I W ) *FZ1 { I W ) 

1003  CONTINUE 

DFT12  *  FC1/FZ12 
FD1  =  DFT12*FC1 
FDT  =  FD1 

IF(FDT)  1004 > 1005 > 1005 

1004  CONTINUE 
FDT  =  -FDT 
DFT12  =  -DFT12 

1005  CONTINUE 

I TF1  =  ITF+1 

FT12 ( I TF1  )  =  FT  12 ( I TF ) +DFT 12 


IF  (TAU1)**2  IS  NEGAT I VE »  TRY  ANOTHER  GUESS 

IF ( FT  12 ( ITF1) )  5200 ♦ 5200  *  5201 

5200  CONTINUE 
FT  1 2 (  1  )  =  ABS ( FT12 ( ITFl )  ) 

IFP  =  IFP+1 
GO  TO  1000 

5201  CONTINUE 

C  CHECH  WHETHER  THE  METHOD  CONVERGES  OR  NOT 

I F ( ABS ( DFT1 2 ) -  0.01)  1007  »  1007  » 1008 

1008  CONTINUE 

FERS2 ( ITFl )  =  0.0 
DO  1006  I W  = 1 #  N  F  Q 

OMEG2 ( I W )  =  OMEGA( IW)*0MEGA( IW) 

FTERl(IW)  =  FT12( ITF1)*0MEG2( I W ) +1 . 0 
FPHI(IW)  =  1.0/SQRT(ABS( FTER1 ( IW) ) ) 

FERR(IW)  =  AMAG ( I W ) -FPHI ( I W ) 

FERS2 ( I TF 1  )  =  FERS2( ITF1)+FERR( IW)*FERR( IW) 
1006  CONTINUE 

FISCE  *  3ETA*FDT*(2.C*ALPHA-ALPHA*ALPHA) 

DELSF  =  FERS2(ITF)-FERS2( ITFl) 

IF (DELSF-FISCE+1 .0E-06 )  10Q9 *  1010 # 1010 

1009  CONTINUE 

ALPHA  =  ALPHA/2.0 

DFB12  =  ALPHA*DFT12 

FT  12 ( ITFl)  =  FT12 (  ITF)+DFB12 

GO  TO  1008 

1010  CONTINUE 

FFFF  =  (FERS2(ITF)-FERS2( ITFl) )/FERS2( ITFl) 

IF ( ABS ( FFFF ) -0.001 )  100  7  »  1007  ♦ 144  3 
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SUBROUTINE  BL123  •••(CONT'D) 


1443  CONTINUE 

ITF  =  ITF+1 

FT  12  (  I TF  )  =  FT12UTF1) 

FERS2 (ITF)  =  FERS2(ITF1) 

A  MAXIMUM  OF  50  INITIAL  ASSUMPTIONS  IS  PERMITTED 
FOR  EACH  INITIAL  ASSUMPTION 

IF(ITF1-  50)  1521,1521,1522 

1522  CONTINUE 
WRITE  (6,1523) 

1523  FORMAT  ( 1  HO , 1 2X , ' TH I S  METHOD  FAILED  TO  CONVERGE  IN  50 

*  ITERATIONS* 

1//) 

GO  TO  1999 
1521  CONTINUE 

GO  TO  1002 
1007  CONTINUE 

IF  ( FT12 ( ITF1 ) )  1700*1700,1701 
1701  CONTINUE 

FT  1  =  SORT ( FT  12 ( ITF1) ) 

.  WRITE  OUT  THE  RESULTS 

WRITE(6»150) 

150  FORMAT ( ///*0 * ,8X ,* FIRST  ORDER  TRANSFER  FUNCTION 

*  REPRESENTATION'/) 

WRITE  (6,151)  FT  1 

151  FORMAT ( *0* »10X, » TAU1  *',F10.3) 

WRITE  (6,152)  FERS2 (ITF) 

152  FORMAT (//'O' »1QX» ' SUM  OF  SQUARRED  ERRORS  IN  FREQUENCY 

*  DOMAIN  IS  *» 

1  *  E 12 • 4  ) 

WRITE  (6,153)  ITF 

153  FORMAT  ( 1H0 , 10X ,' NUMBER  OF  ITERATIONS  REQUIRED*  15) 

GO  TO  1999 

1700  CONTINUE 

FT  12 (  I TF 1 )  =  -FT  1 2  (  ITF1) 

WRITE  (6,1705) 

1705  FORMAT  ( //1H0 *8X , ' THIS  PROBLEM  CONVERGES  TO  A  SOLUTION 

*  WHICH  IS  PH 
1YSICALLY  UNREALIZABLE') 

1999  CONTINUE 


FIT  THE  AMPLITUDE  RATIO  DATA  BY  TWO  FIRST  ORDER 
TRANSFER  FUNCTIONS  IN  CASCADE 

WRITE  (6,6206) 

6206  FORMAT  (1H1) 
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SUBROUTINE  BL123  ...(CONT'D) 

ST  12  <  1)  =  FT12 ( I TF1 ) 

ST  22 ( 1  )  =  0 • 50*ST 1 2(1) 

ISP  =  1 

2000  CONTINUE 

WRITE  (  6  *  620  £» )  ISP 

6205  FORMAT  ( ///8X *• TRIAL  NUMBER ' *  1 3 / / ) 

C  A  MAXIMUM  OF  20  INITIAL  GUESSES  IS  PERMITTED 

I F (  ISP-20  )  6204  *6204*2998 
2998  CONTINUE 

WRITE  (6*6207) 

6207  FORMAT  ( / / /9X * ' FA  I  LED  TO  CONVERGE  TO  A  PHYSICALLY 

*  REALIZABLE  SOLUT 
1ION  AFTER  20  TRIALS' ) 

GO  TO  2999 
6204  CONTINUE 

C  START  THE  ITERATION  PROCEDURE 

ITS  =  1 

SERS2 (ITS)  =  0.0 

DO  2001  I W= 1 *NFQ 

OMEG2 ( I W  )  =  OMEGA ( IW)*0MEGA( IW) 

STERI(IW)  =  ST12 ( ITS)*OMEG2 ( I W ) +1 . 0 
STER2 ( I W )  =  ST22 ( I TS ) *OMEG2 ( I W ) +1 • 0 
SPHKIW)  =  1.0/SQRT(ABS(STER1  (  IW)*STER2  (  IW)  )  ) 
SERR(IW)  =  AMAG( IWJ-SPHI ( IW) 

SERS2 (ITS)  =  SERS2 (ITS) +SERR ( I W ) *SERR ( I W ) 

2001  CONTINUE 
WRITE  (6*248) 

2  48  FORMAT ( 10X  » ' ITERATION'  *7X  ,  »  ( TAUl )**2 '  *9X  *  »  (TAU2 ) **2 

*  ♦  8  X  » 

1 'SUM  OF  ERRORS' //) 

2002  CONTINUE 

WRITE  (6*249)  I TS *ST12 ( I TS ) *ST22 ( I TS ) » SERS2 ( I TS ) 

249  FORMAT  ( 1H0 ♦ 12X » I  3  * 5X * E15 . 6 *4X ♦ E 1 5 . 6 *4X * E 1 5 . 6 ) 

ALPHA  =  1.0 
BETA  =  0.25 
SCI  =  0.0 
SC2  =  0.0 
SZ11  =  0.0 
SZ 1 2  =  0.0 
SZ 22  =  0.0 


DO  2003  I W  = 1  * N F Q 

OMEG2 ( I W )  =  OMEGA ( I W ) *OMEGA ( I W ) 
STERl(IW)  =  ST12( ITS)*OMEG2( IW)+1.0 
STER2 ( I W  )  =  ST22 ( I TS ) *OMEG2 ( I W )  +  1 • 0 
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C*X  *  AH3JA 
£S.0  a  AT3Q 
0.0  =  X02 
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o.o  «  sssa 
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SUBROUTINE  BL123 


•  •  . ( CONT ' D ) 


S  E  R  R  !  I  wi  =  ^°^?RT(ABS(STERinW)^STER2(lW)) 
SERR(IW)  =  AMAG ( I W ) -SPH I ( I W ) 

=  "0*50*OMEG2( IW)*STER2(IW)#SPHI ( IWl 
If  1 2 1 ?:?Mf 62  <  I W  »  *STER1  <  I W  » *SPH  I  <  IW) 

SZ11  -  SZ11+SZ1 ( IW)#SZ1 ( IW) 

SZ12  *  SZ12+SZ1 ( I W ) #SZ2 ( IW) 

SZ22  =  SZ22+SZ2 ( I W ) #SZ2 (  IW) 

SCI  =  SC1+SERR ( I w ) *SZ1 ( I W ) 

SC2  *  SC2+SERR ( I W ) #SZ2 ( I W ) 

2003  CONTINUE 

SZ  2 1  =  SZ  12 
NDIMS  =  2 
SA ( 1* 1 )  =  SZ11 
SA ( 1 »  2  )  =  SZ 1 2 
SA ( 2  *  1 )  =  SZ2 1 
SA ( 2  »  2  )  =  SZ22 
SC  (  1  *  1  )  a  SCI 
SC ( 2 • 1  )  =  SC2 


c 

c 


CALL  SUBROUTINE  SOLEQ  TO  SOLVE  THE  SYSTEM 
EQUATIONS 


CALL  SOLEQ ( SA *  SC # NDIMS *  1 «  DET  * -1 ) 

SDB 1  =  SC ( 1  •  1 ) 

SDB2  =  SC ( 2  *  1 ) 

SD1  =  SDB 1*SC1 
SD2  a  $DB2#SC2 
SDT  =  SD1+SD2 
IF(SDT)  2004  >2005  *2005 

2004  CONTINUE 
SDT  =  -SDT 
SDB 1  =  -SDB 1 
SDB2  =  -SDB2 

2005  CONTINUE 
ITS1  =  I TS+1 

ST12(ITS1)  =  ST12 (  I  TS ) +SDB 1 
ST22( ITS1)  =  ST22 ( ITS) +SDB2 

C  •  CHECK  WHETHER  THE  METHOD  CONVERGES  OR  NOT 

I F ( ABS ( SDB 1 ) -0 • 0 1 )  2006  » 2  00  6 .2  007 

2006  CONTINUE 

IF (ABS(SDB2 ) -0 • 0 1 )  2008*2008*2007 

2007  CONTINUE 

SERS2 ( ITS1)  =  o.O 
DO  2009  I W  =  1  * N F G 
OMEG2 ( I W )  a  OMEGA ( I W ) *OMEGA ( I W ) 

STERl(IW)  =  ST 1 2  < ITS1)*0MEG2( IWJ+1.0 
ST  ER2 ( I W )  =  ST22(ITS1)#0MEG2(IW)+1.Q 
SPH  I  (  I W  )  a  1.0/SQRT(ABS(STER1 ( IW)#STER2 ( IW) ) ) 
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3lM I TH03  AQO£ 
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SUBROUTINE  BL123  ...(CONT'D) 

SERR(IW)  =  AMAG ( IWJ-SPHI ( IW) 

SERS2 ( I TS 1 )  =  SERS2 ( ITS1 ) +SERR ( I W) *SERR ( IW ) 

2009  CONTINUE 

SISCE  =  BETA*SDT*(2 • 0* ALPHA-ALPHA* ALPHA ) 
DELSS  =  SERS2 ( ITS)-SERS2 ( ITS1 ) 
IF(DELSS-SISCE+1.0E-06)  2010*2011*2011 

2010  CONTINUE 

ALPHA  =  ALPHA/2.0 

SDF 1  =  ALPHA*SDB 1 

SDF2  =  ALPHA*SDB2 

ST  12 ( I TS1 )  =  ST12 ( I  TS ) +SDF1 

ST22 ( I TS1 )  =  ST22 ( I TS ) +SDF2 

GO  TO  2007 

2011  CONTINUE 

SSSS  =  (SERS2(ITS)-SERS2( ITS1) )/SERS2( ITS1) 
IF (ABS(SSSS)-l.QE-3 )  2008*2008»2037 
2037  CONTINUE 

ITS  =  ITS+1 

ST  12 ( ITS)  =  ST  1 2 ( I TS 1 ) 

ST22 (ITS)  =  ST2  2 ( ITS1 ) 

SERS2 (ITS)  =  SERS2 ( I TS 1 ) 


A  MAXIMUM  OF  50  ITERATIONS  IS  PERMITTED  FOR  EACH 
INITIAL  ASSUMPTION 

IFUTS1-  50)  2521  »2521  *2522 

2522  CONTINUE 
WRITE  (6*2523) 

2523  FORMAT  ( 1H0 * 12X * ’ THIS  METHOD  FAILED  TO  CONVERGE  IN  100 
*  ITERATIONS1 

1//) 

GO  TO  2999 
2521  CONTINUE 

GO  TO  2002 
2008  CONTINUE 

I F ( ST  12 (  ITS1)  )  6200*6200  *6201 

6200  CONTINUE 

ST  12 (  1)  =  ABS ( ST  1 2 ( ITS1)  ) 

ST  12 ( 1  )  =  ABS ( ST  1 2 ( I TS 1 )  ) 

ISP  =  ISP+1 
WRITE  (6*2708) 

GO  TO  2000 

6201  CONTINUE 

IF  ( TAU1 ) **2  OR  (TAU2)**2  IS  NEGATIVE*  TRV  ANOTHER 
GUESS 

IF ( ST22 ( I TS1 ) )  6202*6202*6203 

6202  CONTINUE 
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SUBROUTINE  BL123  ...(CONT'D) 

ST22 (  1 )  =  ABS ( ST22 ( I TS1 ) ) 

ST22 (  1 )  =  ABS ( ST22 ( I TS 1 )  ) 

ISP  =  ISP+1 
WRITE  (6*2708) 

GO  TO  2000 

2708  FORMAT  ( //1H0#8X# 1  INITIAL  ASSUMPTIONS  OF  TAU1  AND  TAU2 

*  ARE  POOR  * 

1PHYSICALLY  UNREALIZABLE') 

6203  CONTINUE 

ST  1  =  SORT (ST12 ( ITS1 ) ) 

ST  2  =  SORT ( ST22 ( ITS1)  ) 

C  WRITE  OUT  THE  RESULTS 

WRITE  (6*250) 

250  FORMAT(///'0» *8X* 'SECOND  ORDER  TRANSFER  FUNCTION 

*  REPRESENTATION'/) 

WRITE  (6*231)  ST  1 *  ST2 

251  FORMAT (/'O' *  10X  » ' T  AU1  =  '  » F10. 3 * 10X » ' TAU2  =»*F10.3) 
WRITE  (6*252)  SERS2(ITS) 

252  FORMAT ( //'O' *10X* 'SUM  OF  SQUARRED  ERRORS  IN  FREQUENCY 

*  DOMAIN  IS  =' 

1  *  E 1 2  •  A  ) 

WRITE  (6*253)  ITS 

253  FORMAT  ( 1H0 * 10X *' NUMBER  OF  ITERATIONS  REQUIRED'  15) 
2999  CONTINUE 


FIT  THE  AMPLITUDE  RATIO  DATA  BY  THREE  FIRST  ORDER 
TRANSFER  FUNCTIONS  IN  CASCADE 

WRITE  (6*7206) 

7206  FORMAT  (1H1) 

TT 12 (  1  )  =  FT  1 2 (  I  TF 1 ) #0 • 80 
TT22 (  1)  =  FT  1 2 ( ITF1)*0.50 
TT  32 ( 1)  =  FT  12 ( ITF1)*0.30 
I  TP  =  1 
3000  CONTINUE 

WRITE  (6*7205)  ITP 

7205  FORMAT  ( ///8X* ' TRIAL  NUMBER ' » I  3 / / ) 

IF  ( I  TP-20 )  7204*7204*3998 
3998  CONTINUE 

WRITE  (6*7207) 

7207  FORMAT  ( ///9X * ' FAI LED  TO  CONVERGE  TO  A  PHYSICALLY 
*  REALIZABLE  SOLUT 

1 1  ON  AFTER  20  TRIALS' ) 

GO  TO  3999 
7204  CONTINUE 


C 


START  THE  ITERATION  PROCEDURE 
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SUBROUTINE  BL123  ...(CONT'D) 


ITT  =  1 

TERS2 (ITT)  =  0.0 

DO  3001  I W= 1 » NFQ 

0MEG2 ( I W )  =  OMEGA ( IW) IOMEGA ( IW) 

TTERKIW)  =  TT12  (  ITT)*OMEG2  (  IWJ+1.0 
TT ER2 ( I W  )  =  TT2 2 ( I TT ) *OKEG2 ( I W )  +  1 • 0 
TT  ER3 ( I W  )  =  TT32( ITT)*0MEG2( IWJ+1.0 
TPHI(IW)  =  1.0/SQRT(ABS( TTER1 ( IW)*TTER2 ( IW) 

*#TTER3 ( IW)  )  ) 

TERR ( IW  )  =  AMAGt IWJ-TPHI ( IW) 

TERS2 ( ITT)  =TERS2 ( I TT ) +TERR ( I W ) *TERR ( I W ) 

3001  CONTINUE 
WRITE  (6.348) 

348  FORMAT  { 10X * 1  I TERAT ION • * 7X * » ( TAU 1 ) *#2 '  » 9X * ' ( TAU2 ) **2 1 
**9X* '  ( T  AU3 ) *# 

12'  *  8X  *  '  SUM  OF  ERRORS'//) 

3002  CONTINUE 

WRITE  (6  *349)  ITT*TT12 ( ITT  )  ,TT22 ( ITT)  *TT32( ITT ) 

*  *  T  ERS2 ( ITT) 

349  FORMAT  ( 1H0 * 12X »  I  3 . 5X ♦ El  5 . 6 »4X * E 1 5 . 6 » 4X > E 1 5 . 6 . 4X 

*  *  E 15 • 6  ) 


ALPHA  =  1.0 
BETA  =  0.25 
TCI  =  0.0 
TC2  =  0.0 
TC3  =  0.0 
TZ1 1  =  0.0 
TZ 12  =  0.0 
TZ 1 3  =  0.0 
TZ22  =  0.0 


TZ23 

TZ33 


=  0.0 
=  0.0 


I  W= 1 *NFQ 

=  OMEGA ( I W ) *OMEGA ( I W ) 

=  TT 1 2 ( I TT ) *0MEG2 ( I W ) +1 • 0 

=  TT22 ( I TT ) *0MEG2 ( I W ) +1 • 0 

=  TT32 ( ITT)#0MEG2 ( I  W  )  + 1  •  0 
=  1.0/SQRT(ABS(TTER1 ( IW ) *TTER2 ( I W ) 

**TTER3 ( IW )  )  ) 

TERR ( IW )  =  AMAG ( I W ) “TPH I ( I W ) 

TZ1 ( IW)  *  -0 • 50#OMEG2 ( I W ) *TTER2 ( I W ) *T7 ER3 ( I W ) *TPH I ( I W ) 


DO  3003 
0MEG2 ( IW ) 
TTER1 ( IW) 
TTER2 ( IW) 
TTER3 ( IW ) 
TPHI ( IW) 


TZ2( IW) 
TZ3 ( IW ) 

■*#-m-3 


-0 . 50*0MEG2 ( IW ) *TTER1 ( I W ) *TTER3 ( I W ) *  T  P  H I ( IW) 
-0 • 5Q*OMEG2 ( I W ) *TTER1 ( I W ) *TTER2 ( I W ) *TPH I ( IW) 
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SUBROUTINE  BL123 


•  •  • ( CONT • D ) 


TZ11  =  T211+TZ1 ( IW)#TZ1 ( IW) 

TZ12  =  TZ12+TZ1 ( IW)#TZ2 ( IW) 
T  Z 1 3  =  TZ13+TZ1 ( IW)*TZ3 ( IW) 
TZ22  =  TZ22+TZ2 ( IW)*TZ2 ( IW) 
TZ23  =  TZ23+TZ2 ( I W ) *TZ3 ( IW) 
TZ33  =  TZ33+TZ3 ( IW) *TZ3 ( IW ) 
TCI  =  TC1+TERR( IW)#TZ1 ( IW) 
TC2  =  TC2+TERR( I W  )  #TZ2  ( IW) 
TC  3  =  TC3  +  TERR ( IW ) *TZ3 ( I W ) 
3003  CONTINUE 

TZ  2 1  =  TZ  12 
TZ  3 1  =  TZ  1 3 
TZ  32  =  TZ  23 


TA ( 1  *  1 ) 

= 

TZ  1 1 

TA ( 1  *  2 ) 

= 

TZ  12 

TA ( 1  *  3 ) 

= 

TZ  1 3 

TA ( 2  *  1  ) 

= 

TZ2 1 

T  A  (  2  *  2  ) 

= 

TZ  22 

T  A  (  2  *  3  ) 

s 

TZ23 

TA ( 3  »  1  ) 

s 

TZ3 1 

TA ( 3  *  2  ) 

= 

TZ32 

T  A  (  3  *  3  ) 

s 

TZ33 

NDIMT  = 

3 

TC(ltl) 

& 

TCI 

TC ( 2  *  1  ) 

= 

TC2 

TC ( 3  *  1  ) 

= 

TC3 

CALL 

SUBROUTINE  SOLEQ  TO  SOLVE  A  SYSTEM  OF  3 

EQUATIONS 

CALL  SOLEQ(TA*TC*NDIMT  *  1 >  DET  » -1  ) 
TDB 1  =  TC(  1*1) 

TDB2  =  TC ( 2  *  1 ) 

TDB3  =  TC ( 3  # 1 ) 

TD1  =  TDB1*TC1 
TD2  =  TDB2*TC2 
TD3  =  TDB3#T  C3 
TDT  =  TD1+TD2+TD3 
IF(TDT)  3004  >300  5  *3005 

3004  CONTINUE 
TDB 1  =  -TDB1 
TDB2  =  -TDB2 
TDB3  =  -TDB3 
TDT  =  -TDT 

3005  CONTINUE 
ITT1  -  ITT  +  1 

TT 1 2 (  ITT1)  =  TT 12 (  I  TT ) +TDB1 
TT22 (  ITT1 )  =  TT22 (  I  TT ) +TDB2 
TT32(  ITT1)  =  TT32 ( I TT ) +  TDB3 
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£  *  TWJ  QH 
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s r  *  (XtSJ^T 
£0T  *  (X«£)DT 
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SUBROUTINE  BL123  ...(CONT'D) 

CHECK  WHETHER  THE  METHOD  CONVERGES  OR  NOT 

IF ( ABS ( TDB1 )  -  0# 10 )  3006*3006*3007 

3006  CONTINUE 

IF (ABS(TDB2 )  -0  • 10)  3008*3008*3007 

3008  CONTINUE 

IF ( ABS( TDB3 )-0. 10 )  3020*3020*3007 

3007  CONTINUE 
TDF 1  =  TDB 1 
TDF2  =  TDB2 
TDF3  =  TDB3 

3888  CONTINUE 

TERS2 ( ITT1)  =  0.0 
DO  3009  I W=1 *NFQ 
OMEG2UW)  =  OMEGA  (  IW)  IOMEGA  (  IW) 

TTERl(IW)  =  TT12(ITT)*OMEG2(IW)+1.0 
TTER2 ( I W )  =  TT22 ( I T  T ) *  OMEG  2 ( I W  }  + 1  •  0 
TT  ER3 ( I W  )  =  TT32( ITT)*OMEG2( IWJ+1.0 
TPHI(IW)  =  1 • 0/SQRT ( ABS ( TTER1 ( I W ) *TTER2 ( I W ) 

**T  TER  3 ( IW)  )  ) 

TERR(IW)  =  AMAGl IWJ-TPHI ( IW) 

TERS2 (ITT)  =TERS2 ( I  TT ) +TERR ( I W ) *TERR ( IW) 

TERS2 (ITT)  =TERS2 ( I TT ) +TERR ( IW)*TERR( IW) 

TERS2(ITT1)  =  TERS2( ITT1)+TERR( IW)*TERR( IW) 

3009  CONTINUE 

TISCE  =  BETA*TDT*(2.0*ALPHA-ALPHA*ALPHA) 

DELST  =  TERS2 ( I TT ) -TERS2 ( I TT1 ) 

I F ( DELST-T I SCE )  3010*3011*3011 

3010  CONTINUE 

ALPHA  =  ALPHA/2.0 

TDB 1  =  ALPHA#TDF1 

TDB2  =  ALPHA*TDF2 

TDB3  =  ALPHA^TDF3 

TT 12 ( ITT1)  =  TT 1 2 (  I  TT ) +TDB1 

TT22 ( I T T 1 )  =  TT22 (  I  TT ) +TDB2 

TT  32 ( I TT  1 )  =  TT32 ( ITT) +TDB3 

GO  TO  3888 

3011  CONTINUE 

TTTT  =  ( TERS2 ( I TT )-TERS2 ( ITT1 ) ) /TERS2 ( ITT1 ) 
IF(A9S(TTTT)-l.QE-3)  3020*3020.3579 
3579  CONTINUE 

ITT  =  ITT+1 

TT 12 ( ITT)  =  TT 1 2 ( I TT 1 ) 

TT22 ( ITT  )  =  TT22 ( ITT1 ) 

TT 32 ( ITT  )  =  TT32  (  ITT1 ) 

TERS2 (ITT)  =  TERS2 ( I TT 1 ) 

A  MAXIMUM  OF  50  ITERATIONS  IS  PERMITTED  FOR  EACH 
INITIAL  ASSUMPTION 
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SUBROUTINE  BL123  •••(CONT’D) 

IFdTTl-  50)  7521  .7521 ,7522 

7522  CONTINUE 
WRITE  (6*7523) 

7523  FORMAT  ( 1  HQ » 1 2X * ' TH I S  METHOD  FAILED  TO  CONVERGE  IN 

*  ITERATIONS1 
1//) 

GO  TO  3999 
7521  CONTINUE 

GO  TO  3002 
3020  CONTINUE 

IF  (TAU1)**2*  ( T AU2 ) #*2  OR  (TAU3)**2  IS  NEGATIVE* 
TRY  ANOTHER  GUESS 

IF (TT12 (  ITT1)  )  7200  *7200  *7201 

7200  CONTINUE 
TT  12 (  1)  =  ASS ( T T 1 2  (  ITT1)  ) 

TT22 (  1 )  =  ABS (TT22(ITT1)  ) 

TT 32 (  1  )  =  ABS (TT32  (  ITT1 )  ) 

WRITE  (6*3710) 

I  TP  =  ITO  +  1 
GO  TO  3000 

7201  CONTINUE 

IF ( TT22 ( I TT1 ) )  7301*7301*7302 

7301  CONTINUE 

TT 12 (  1  )  =  ABS ( TT 1 2 (  I  TT 1  )  ) 

TT22 (  1  )  =  A3S(TT22(ITT1)  ) 

TT 32 (  1  )  =  ABS(TT32  (  ITT1 )  ) 

I  TP  =  ITP  +  1 
WRITE  (6*3710) 

GO  TO  3000 

7302  CONTINUE 

I F ( TT32 ( I TT1 )  )  7303  *7303.7304 

7303  CONTINUE 

TT 1 2 (  1)  =  ABS ( T T 1 2  (  I  TT  1 )  ) 

TT22 (  1  )  =  ABS(TT22(ITT1)  ) 

TT  32 (  1  )  =  ABS ( T  T32  (  I  TT 1 )  ) 

ITP  =  ITP+1 
WRITE  (6*3710) 

GO  TO  3000 

3710  FORMAT  ( //lHO  *8X  *  ■  INITIAL  ASSUMPTIONS  OF  TAU1  *  TAU2 

*  TAU3  ARE  PO 
10R  '  ) 

7304  CONTINUE 

C  WRITE  OUT  THE  RESULTS 

TT 1  =  SORT ( TT12 (  ITT1)  ) 

TT2  =  SORT ( TT22 ( ITT1) ) 

TT3  =  SORT ( TT32 ( ITT1) ) 
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SUBROUTINE  BL123  ...(CONT'D) 

WRITE  (6*350) 

350  FORMAT (///• 0 ' *8X »' THIRD  ORDER  TRANSFER  FUNCTION 

*  REPRESENTATION'/) 

WRITE  (6.351)  TT1.TT2.TT3 

351  FORMAT(/'0'  *10X»  '  T  AU1  =  '*  F7.3,  6X.'TAU2  ='»  F7.3*  6X 
*♦  ' TAU3  *  1  *  F7 

1.3  > 

WRITE  (6*352)  TERS2(ITT1) 

352  FORMAT (//'O'  » 10X  * ' SUM  OF  SQUARRED  ERRORS  IN  FREQUENCY 

*  DOMAIN  IS  * • 

1.E12.4) 

3999  CONTINUE 
RETURN 
END 
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SUBROUTINE  BLUND 

SUBROUTINE  BLUND  ( OMEGA  * AMAG * NFQ ) 


C 

c 

c  SUBROUTINE  BLUND 

C  - 

c 

c 

C  PURPOSE 

C  FIT  THE  AMPLITUDE  RATIO  DATA  BY  UNDERDAMPED  SECOND 

C  ORDER  TRANSFER  FUNCTIONS 

C 

C  DESCRIPTION  OF  PARAMETERS 

C  OMEGA  FREQUENCY 

C  AMAG  MAGNITUDE  RATIO 

C  NFQ  NUMBER  OF  DATA  POINTS 

C 

C  USAGE 

C  CALL  BLUND  ( OMEGA  * AMAG ♦ NFQ ) 

C 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  SOLEQ 

C 

C  METHOD 

C  BAILEY  AND  LAW’S  NON  LINEAR  REGRESSION  TECHNIQUE 

C 

C  REFERENCE 

C  BAILEY*  R.V.*  AND  LAW*  V.J.*  'A  METHOD  FOR  THE 

C  DETERMINATION  OF  APPROXIMATE  SYSTEM  TRANSFER 

C  FUNCTION1*  CHEMICAL  ENGINEERING  SCIENCE*  VOL.  18* 

C  PP. 189-202*  (1963). 

C 

C 

DIMENSION  OMEGA (50)  *OMEG2(50) *AMAG(50) 

DIMENSION  UTERI ( 50 ) *UTER2 ( 50 ) *UPHI (50) *UERR( 50 ) 

*  *UZ 1 ( 50  )  *  UZ2 ( 50 ) 

DIMENSION  UA( 10*20) *UC( 10*10) 

DIMENSION  UERS2 ( 100 ) *UTT1 ( 100 ) *UTT2 ( 100 ) 

WRITE  (6*400) 

400  FORMAT  (1H1) 

UTTl(l)  =  120.0 
UT  T2 (  1  )  =  11.0 
IUP  =  1 
4000  CONTINUE 

WRITE  (6*402)  IUP 

402  FORMAT  ( ///8X* ' TRIAL  NUMBER ' *  I  3 / / ) 

C  A  MAXIMUM  OF  20  INITIAL  GUESSES  IS  PERMITTED 


Qf-jja  3MiTuo«euo 


<03;  « OAMA# AO-^OJ  QHUje  3^ITJOS6U2 

. 


Q/UJfl  3/ITUOR8U2 


0 


3003803  0 

.•AQH3QHJ  Y6  AT  AC;  QITAfl  3QUTIJ3YA  3MT  TM 

OtfOITOl*U3  8330i/<A8T  8308C 

<  i  •  AM  3C  *-.01 T ^ I  0830  'j 

Y0H3UQ383  A03M0  0 

01TA>  aaUTIMOAv  OAMA 

0T.U03  ATAC  30  836MIM  •  £3;' 

30A8U  0 

<  03/.  1 0  AM  At  A03M0 )  O/UJQ  JJAO  D 

0 

33WU'.  _  e  a> oO*-^  ^o  /.oiTonu3  o/a  03/ituof8uo  d 

03J08 

0 

OOHT3M  0 

3L«,  I/H03T  iAOI  d03£fi38  HA3/11J  ZQ/  O’WAJ  QUA  Y3JIAP 

0 

30/383338  3 

)HT3M  A'  t.L.v  t  WAJ  C/A  t*V*8  t  Y  3  J  I  A  H 

8330/AfcT  '’3T0Y0  3TA<V  I  X0833A  30  ZO 1  T  Ail  I  M83T3Q  3 

*til  *JOV  tiD/OICO  3  1833/ I  Di-13  JA0IM3H0  t*Z0IT3ZU3 

•<eaei)  tscs-esx.qq  j 


( ce ) oama*  ( oe )  so  :  -'o*  ( cs )  ao3mo  /oio/3^io 
(  Q  c  )  /.  >;  3  U  t  COe)  lM3Ut  <0c)S83TUt  (0e)X83T'J  K0I0Z3Mia 

(oe)ssut (ce)xsut* 
(ox*cx)ou# (os#cx)Au  noienaMia 

COOX )STTU« (OCX) X  TTUt (OOX ) S083U  ZOIOZ3MIC3 

(OQAtO)  3TI8* 
t  XHX )  TAM803  OCA 
0*  CSX  «  (X)XTTU 
0 .XX  *  (X)STTU 

x  «  qui 

3UZ I TZOD  OOOA 

,  qui  ISOAtd)  3T I 8W 

•  f  ’  J6YUZ  JA  2  JRT  *  *  • 

0  iTlv833  01  0300 3U0  JAITIZi  OS  ^0  MUM  IX AM  A 


r\  o 


B-  38 


SUBROUTINE  BLUND  ...(CONT'D) 

I F ( I  UP-20 )  4004*4004*4002 
4002  CONTINUE 

WRITE  (6  *  404 ) 

404  FORMAT  ( / / /9X * 1 F A  I  LED  TO  CONVERGE  AFTER  20  TRIALS') 
GO  TO  4999 

4004  CONTINUE 

C  START  THE  ITERATION  PROCEDURE 

ITU  =  1 

UERS2 (ITU)  =  0.0 
DO  4006  IW=1*NFQ 

UTERI ( I W )  =  l.Q-UTTK ITU)*QMEGA( IW)*OMEGA( IW) 

UTER2 (ITU)  =  UTT2 ( ITU) #OMEGA ( I W ) 

UPHI  (  IW )  =  1.0 /SORT (UTERI (  ITU )*UTER1 ( ITU)+UTER2 (ITU) 
**UTER2 ( ITU) ) 

UERR(IW)  =  AMAG ( I W ) -UPH I ( I W ) 

UERS2UTU)  =  UERS2  (  ITU)+UERR(  IW)*UERR(  IW) 

4006  CONTINUE 

WRITE  (6*406) 

406  FORMAT  ( 10X * • I TERAT ION ' *  1 IX  * • A ' *  1 3X * ' B *  *  1 IX * ' SUM  OF 
*  ERRORS'//) 

4009  CONTINUE 

WRITE  (6*456)  ITU*UTT1( ITU) *UTT2( ITU) >UERS2l ITU) 

456  FORMAT  ( 1H0 * 12X *  I  3  * 5X * E 1 5 . 6 *4X , E 1 5 . 6 *4X ♦ E 1 5 . 6 ) 


ALPHA  =  1.0 

BETA  =  0.25 

UC1  =  0.0 

UC2  =  0.0 

UZ11  =  0.0 

UZ 12  =  0.0 

UZ22  =  0.0 

DO  4008  I W= 1 *NFQ 

UTERI (I W  )  =  1.0-UTTH ITU)*OMEGA( IW)*0MEGA( IW) 

UT ER2 ( I W  )  =  UTT2 ( I TU ) *OMEGA ( I W ) 

UPHI ( IW)  =  1.0 /SORT (UTERI ( IW)*UTER1 ( IW ) +UTER2 ( I W ) 

.  **UTER2 ( IW )  ) 

UERR(IW)  =  AMAG ( IW)-UPHI ( IW) 

UZKIW)  =  -OMEGA  (  I W  )  *OMEGA  (  I W  )  *UPH  I  (  IW)**3*(UTT1(  ITU) 
**OMEGA ( IW) * 

IOMEGA ( I W ) — 1 . 0 ) 

U  Z  2 ( I W )  =  -OMEGA ( IW )#OMEGA( IW)*UPHI ( IW)**3#UTT2( ITU) 
UZ11  =  UZ11+UZ1 ( IW)*UZ1( IW) 

UZ 12  =  UZ12+UZ1 ( IW)*UZ2 ( IW) 

UZ22  =  UZ22+UZ2 ( IW)*UZ2 ( IW) 

UC1  =  UC1+UERR ( I W ) *UZ1 ( IW ) 

UC2  =  UC2+UERR ( I W ) *UZ2 ( I W ) 

4008  CONTINUE 
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SUBROUTINE  BLUND 


•  •• (CONT'D) 


UZ  2  1  =  UZ 12 
NDIMU  =  2 


SOLE  A  SYSTEM  OF  2  EQUATIONS 


4600 


4601 


UA (1*1)  =  UZ 1 1 
UA ( 1  *  2  )  =  UZ 12 
UA ( 2  *  1  )  =  UZ21 
UA ( 2 , 2  )  =  UZ22 
UC<1*1)  =  UC1 
UC ( 2  *  1 )  =  UC2 

CALL  SOLEQ ( UA  * UC  *  NDIMU  *  1 ♦  DET  *-l ) 
UDB 1  =  UC<1»1) 

UDB2  =  UC ( 2  *  1 ) 

UD1  -  UDB 1 *UC 1 

UD2  =  UDB2*UC2 

UDT  =  UD1+UD2 

IF(UDT)  4600*4600*4601 

CONTINUE 

UDT  =  -UDT 

UDB 1  =  -UDB 1 

UDB2  =  -UDB2 

CONTINUE 

ITU1  =  ITU+1 

UTTl(ITUl)  =  UTT 1 ( ITU) +UDB 1 
UTT2 (  I  TUI  )  =  UTT2 ( ITU) +UDB2 


C  CHECK  WHETHER  THE  METHOD  CONVERGES  OR  NOT 


IF ( ASS (UDB1 ) -0.010 )  4608  *4608*4100 

4608  CONTINUE 

IF (ABS(UDB2 ) -0.010 )  4500*4500*4100 
4100  CONTINUE 

UERS2 ( I  TUI )  =  0.0 
DO  4102  I W= 1 *NFQ 
OMEG2 ( I W  )  =  OMEGA ( I W ) #OMEGA ( I W ) 

UTERI ( I W  )  =  1.0-UTT1 ( ITU1 )#OMEG2 ( I W ) 

UTER2 ( I W  )  =  UTT 2 ( I  TUI ) *OMEGA ( I W ) 

UPHI (  I W )  =  1.0/SQRT( UTERI ( IWJ  *UTER1 ( I W ) +UTER2 ( IW ) 
**UTER2 ( IW)  ) 

UERR(IW)  =  AMAG ( IWJ-UPHI ( IW) 

UERS2  (  I  TUI )  =  UERS2UTU1  )+UERR(  IW)*UERR(  IW) 

4102  CONTINUE 

UISCE  =  BETA*UDT* ( 2 • 0*ALPHA-ALPHA*ALPH A ) 

DELSU  =  UERS2 ( ITUJ-UERS2 ( ITU1 ) 

IF (DELSU-UISCE+1 .0E-06 )  4104,4104*4106 
4104  CONTINUE 

ALPHA  =  ALPHA/2.0 
UDF 1  =  ALPHA*UDB 1 
UDF2  =  ALPHA*UDB2 
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SUBROUTINE  BLUND  •••ICONT'D) 

UT  T 1  ( I  TU 1 )  =  UTT 1 ( ITU) +UDF 1 
UTT2 (  I  TUI )  =  UTT2 ( I TU ) +UDF2 
GO  TO  4100 
4106  CONTINUE 

ITU  =  ITU+1 

UTT 1 ( ITU)  =  UTT 1 ( I  TUI ) 

UTT2 ( ITU)  =  UTT  2 ( ITU1) 

UERS2 (ITU)  =  UERS2 ( ITU1 ) 

IF ( ITU— 50  )  4108  *4108*4110 

C  FAILED  TO  CONVERGE 

4110  CONTINUE 

WRITE  (6*410) 

410  FORMAT  ( 1H0 *  1 2X , * TH I S  METHOD  FAILED  TO  CONVERGE  IN  50 

*  ITERATIONS* ) 

GO  TO  4999 

4108  CONTINUE 

GO  TO  4009 
4500  CONTINUE 

I F ( UT T 1 (  I  TU 1 )  )  4200  >4200  *4202 
4200  CONTINUE 

UTT  1  (  1  )  =  ABS ( UTT 1 ( I  TUI )  ) 

UT T2 (  1  )  =  ABS ( UTT2  (  I  TUI )  ) 

IUP  =  IUP  +  1 
WRITE  (6*412) 

4202  CONTINUE 

I F ( UTT2 ( I  TUI )  )  4204*4204,4206 
4204  CONTINUE 

UTT  1  (  1  )  =  ABS (UTT1 (  ITU1 )  ) 

UTT2 (  1  )  =  ABS ( UTT2 (  ITU1 )  ) 

IUP  =  IUP+1 
WRITE  (6*412) 

GO  TO  4000 

412  FORMAT  ( //1H0*8X *' INITIAL  ASSUMPTIONS  ARE  PCOR*START 

*  ANOTHER  GUESS 

1  '  ) 

4206  CONTINUE 

C  WRITE  OUT  THE  RESULTS 

A  =  UTT1 ( ITU) 

B  =  UTT2 ( ITU) 

WRITE  (6*450) 

450  FORMAT  (////* SECOND  ORDER  TRANSFER  FUNCTION 

*  REPRESENTATION*/) 

WRITE  (6*451)  A  *  B 

451  FORMAT  (//10X*'A  = '  » F 10 • 3 , 10X *  * B  «'*F10#3) 

WRITE  (6*453)  UERS2(ITU) 

453  FORMAT  (///10X**SUM  OF  SQUARES  ERRORS  IN  FREQUENCY 
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SUBROUTINE  BLUND  . • . ( CONT ' D  ) 

*  DOMAIN  IS  =' 

1 »  E 1 2  •  4  ) 

WRITE  ( 6  > 454 )  ITU 

454  FORM  AT ( 1H0  » 10X  *  1  NUMBER  OF  ITERATIONS  REQU I  RED '  ♦ I  5 ) 
4999  CONTINUE 
RETURN 
END 
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SUBROUTINE  SOLEQ ( A > B * N *  NS YS » DET  *  FLAG ) 
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SUBROUTINE  SOLEQ 


PURPOSE 

CALCULATE  THE  DETERMINANT  OF  MATRIX  A*  THE  INVERSE 
OF  MATRIX  A*  OR  SOLVE  THE  SYSTEMS  OF  EQUATIONS 
A*X  =  B 

DESCRIPTION  OF  PARAMETERS 

A  LOCATION  OF  AUGMENTED  MATRIX  A 

B  LOCATION  OF  MATRIX  B 

N  ORDER  OF  MATRIX  A 

NSYS  NUMBER  OF  COLUMNS  IN  MATRIX  B 

DET  DETERMINANT  OF  MATRIX  A 

FLAG  PROGRAM  CONTROL  FLAG 

0  ...  CALCULATE  THE  DETERMINANT  ONLY 
1  ...  CALCULATE  THE  INVERSE  MATRIX  AND 
THE  DETERMINANT 

-1  . ..  SOLVE  THE  SYSTEMS  OF  EQUATIONS 

USAGE 

CALL  SOLEQ  (A»  3*  N*  NSYS*  DET*  FLAG) 

METHOD 

GAUSSIAN  ELIMINATION  WITH  PIVOTING 
REFERENCE 

CONTE*  S.D.*  ' ELEMENT  ARY  NUMERICAL  ANALYSIS1*  PP. 

156-176*  MC  GRAW  HILL  CO.»  NEW  YORK*  (1965). 

SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
NONE 


INTEGER  FLAG 

DIMENSION  A ( 10  *  20  )  *B(10*10) *  X ( 2  0 ) 
SIGN  =  1 
MARK  =  0 
NM1  =  N-l 
NP1  =  N+ 1 
NN  =  2 • 0*N 
NPLSY  =  N+NSYS 
I F ( FLAG  )  1020*1020*1010 

1010  CONTINUE 
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SUBROUTINE  SOLEQ 


• • . ( CONT • D ) 


DO  1012  K= 1 #  N 
DO  1012  j  = 1 f  N 
B ( K» J )  =  0*0 
1012  CONTINUE 

DO  1014  J=1 *N 
B ( J  » j )  =  l,o 
1014  CONTINUE 

NPLSY  =  NN 
1020  CONTINUE 

CONSTRUCTION  OF  THE  AUGMENTED  MATRIX 

DO  1000  I  =  1 » N 
DO  1000  J  =  NP  1  *  NPLSY 
K  =  J-N 

A  (  I  >  J  )  =  B  (  I  »  K  ) 

1000  CONTINUE 


DO  1190  I =1 »NM1 
C  PICK  UP  PIVOT  ELEMENT 

MAX  =  I 

AMAX  =  ABS ( A ( I  *  I )  ) 

IP1  =  1+1 
DO  1040  Ks  I  P 1 »  N 

I F ( ABS ( A ( K  *  I )  ) -AMAX )  1040  » 1 040*1030 
1030  CONTINUE 
MAX  =  K 

AMAX  =  ABS ( A ( K  » I ) ) 

1040  CONTINUE 

IF ( MAX- I )  1050  »  1080  » 1050 
1050  CONTINUE 

C  ROW  INTERCHANGES 

DO  1060  L= I  *  NPLSY 
TEMP  =  A (  I  »  L ) 

A (  I  *  L  )  =  A ( MAX  »  L ) 

A ( MAX  *  L  )  =  TEMP 
1060  CONTINUE 

SIGN  =  -SIGN 
1080  CONTINUE 

DO  1180  J  = I P 1 » N 

I F ( ABS ( A ( J  *  I )  ) -1 • 0E-1C )  1 120  » 1 120  *  1 1 10 
1110  CONTINUE 

CONST  =  -A ( J  # I ) / A ( I # I ) 

DO  1120  L= I ♦ NPLSY 

A(J*L)  =  A(J»L)+A( I*L)*CONST 


I  C  1  T.'CD  )  •  •  •  0:3  JC2  li  lTUO^i'Ja 

SI  I  CO 
■  *  X  *L  -Si  I  GG 

0.0  -  ( L»> ) a 

iUHT/o:  SIOI 

m«x*l  <4101  oa 

0 . 1  «  tucn 

3U/.ITHOO  4101 
*  Ysjqn 
3U/IT/OD  OSOI 

Q3T/3  DJA  3HT  10  MOI TOUflT2MOO  0 


0001  OG 
Y2JM  #  iqn*u  0001  OG 

M*V*  *  > 

Of  •  r )  a  ■  (  l  *  1 )  a 

3UMIT/O0  0001 


x v.ir- •  i « x  09ii  oa 


t *3^3J3  Toviq  qu  >ojq  v  o 

I  *  XAM 
( ( I t I ) A ) 2QA  *  XAMA 
X  +  I  *  xqi 
/.xsi=>  040i  oa 

v£  I  [  ( XAMA-I t I #X) A)28A) II 

3U/1ITHOO  0801 
>  *  XAM 
(  ( I *X) A)28A  *  XAMA 

ju/nroo  04  1 

I*  c Ci  (I -XAM) II 

3U/ITH00  oeox 


230^  AH0H3TM I  WOP 

Y2jq^#i«j  odoi  oa 

(  Jt  I)  A  *  9M3T 
( J*XAM)A  «  ( Jt I )A 
1M3T  *  ( J • XAM ) A 

3U*'ITMOO  0201 
MO  I  2-  »  AD  1 2 

3UMITMOO  OftOI 

/tiqj«L  oeii  oa 

'wXXifOSXXtCSXX  (  OX -30.  X-(  (  1  •  L  )  A)2eA)  II 

' 

t  It  X)  A\  ( I  •  L  )  A-  *  T2M.OO 
Y2jq/lfI«j  CSXX  oc 

r 2 V> CO*(J#I)A+(JtL)A  *  (  J  «  L  )  A 


n  n 


SUBROUTINE  SOLEO 


.  •  .  ( CONT ' D ) 


1120  CONTINUE 
1180  CONTINUE 
1190  CONTINUE 


TEMP  =  1.0 

C  COMPUTE  DETERMINANT  OF  MATRIX  A 

DO  2030  I  =  1  #N 

I  F ( ABS ( A ( I  *  I ) ) -1 • 0E-10 )  2010* 20 10*2020 
2010  CONTINUE 

t 

CONTENT  OF  MARK  IS  SET  EQUAL  TO  1  -  MATRIX  A  IS 
SINGULAR 

MARK  =  1 
WRITE  (6*100) 

100  FORMAT  (///10X* ‘MATRIX  A  IS  SINGULAR  -  EXIT') 

GO  TO  2040 
2020  CONTINUE 

TEMP  =  TEMP* A ( 1*1) 

2030  CONTINUE 

DET  =  S I GN#TEMP 
2040  CONTINUE 

I F ( FLAG  )  3000*9999*3000 
3000  CONTINUE 

I F ( FLAG-1 )  3020*3010*3020 
3010  CONTINUE 

IF (MARK- 1  )  3020  *9999*3020 
3020  CONTINUE 

C  BACK  SUBSTITUTE 

DO  4050  I SNP 1  * NPLSY 
K  =  N 

4000  CONTINUE 

X  (  K  )  =  A  (  K  *  I  ) 

IF(K-N)  4010*4020*4010 
4010  CONTINUE 
JP1  =  K+l 
DO  4020  J  =  JP 1  * N 
X ( K )  =  X ( K ) -A ( K  *  J ) *X ( J ) 

4020  CONTINUE 

X  (  K  )  =  X  (  K  )  /A  (  K  *  K  ) 

IF(K-l)  4030*4040*4030 
4030  CONTINUE 
K  =  K-l 
GO  TO  4000 
4040  CONTINUE 
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SUBROUTINE  SOLEQ  ...(CONT‘D) 


DO  4050  L=  1  *  N 
A  (  L  » I  )  =  X  (  L  ) 

4050  CONTINUE 

C  THE  INVERSE  OR  THE  SOLUTION  MATRIX  X  WILL  BE  STORED 

C  IN  THE  MATRIX  B 

DO  5000  I  =  1  * N 
DO  5000  J  =  NP 1 »  NPLSY 
K  =  J-N 

B ( I f K )  =  A( I  * J) 

5000  CONTINUE 
9999  RETURN 
END 
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MAINLINE  FDCPO 
MAINLINE  FDCPO 
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*  * 

*  MAINLINE  FDCPO  * 

*  - - - —  * 

*  * 
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PURPOSE 

DETERMINE  THE  VALUES  OF  FOURIER  COEFFICIENTS  WHICH 
CAN  BE  USED  TO  APPROXIMATE  THE  TRANSFER  FUNCTION 
OF  A  LINEAR  SYSTEM  FROM  ITS  FREQUENCY  RESPONSE 

DESCRIPTION  OF  PARAMETERS 
OMEGA  FREQUENCY 

AMAG  MAGNITUDE  OF  THE  BODE  PLOT 

NFQ  NUMBER  OF  INPUT  DATA  POINTS 

INDEX  PROGRAM  CONTROL  FLAG 

1  •••  PHASE  LAGS  ARE  GIVEN  IN  DEGREES 
-1  ...  PHASE  LAGS  ARE  GIVEN  IN  RADIANS 

USAGE 

ENTER  DATA  AS  REQUIRED 

SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
LEASQ  ♦  QSF 

METHOD 

CHEN  AND  PHILIP'S  METHOD 
REFERENCE 

CHEN  *  C  •  F  •  »  AND  PHILIP*  B.L.*  'GRAPHICAL  DETERMINA¬ 
TION  OF  TRANSFER  FUNCTION  COEFFICIENTS  FROM  ITS 
FREQUENCY  RESPONSE'*  A*I*E*E*  TRANS**  APPLICATIONS 
AND  INDUSTRY*  PP*  42-45*  MARCH*  1963* 

REMARKS 

THIS  METHOD  IS  RESTRICTED  TO  MINIMUM  PHASE  TRANSFER 
FUNCTIONS 


DIMENSION  AREAL ( 1 20 ) *  AMAT(12Q)*  AFOR(120)*  PHICN(5Q) 
DIMENSION  OMEGA ( 50 ) *AMAG ( 50 ) »PHASE ( 50 ) 

DIMENSION  PM AG (120) *  PH  I (120) » ACOEF ( 1 1 )  * AF ( 120 ) 

*  *  AFOUR ( 2  5  )  » 
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mainline  fdcpo 


• • . (CONT'D ) 


1 EXPRS (120) 

PI  =  3.141596 
DELPH  =  0  •  02#P I 
READ  (5*205  NCASE 
20  FORMAT  (15) 

DO  9999  K J= 1  * NCASE 
READ  (5*1)  NFQ, INDEX 
1  FORMAT  (215) 

READ  (5  *333)  ( OMEGA ( I ) » AMAT ( I ) *  PHASE (  I  ) *  I  *  1 ♦ NFQ ) 

333  FORMAT (10X*F9.4*17X*F8.3*6X»F8.3) 

C  IF  INDEX  =  1  CONVERT  THE  PHASE  LAGS  FROM  DEGREES  TO 

C  RADIANS 

IF ( INDEX-1  )  2460  *2470*2460 
2470  CONTINUE 

DO  2480  I  =  1  *  NFQ 
PKASE(I)  =  PHASE ( I ) *P I / 180 • 0 
2480  CONTINUE 
2460  CONTINUE 

C  COMPUTE  REAL  PARTS  OF  THE  TRANSFER  FUNCTION 

DO  2500  I  =  1  *  NFQ 

AMAG ( I )  =  AMAT ( I ) /AMAT ( 1 ) 

AREAL ( I  )  =  AMAG ( I ) *COS ( PHASE ( I ) ) 

2500  CONTINUE 

C  CHANGE  THE  INDEPENDENT  VARIABLE  FROM  OMEGA  TO  PHICN 

DO  1000  I W* 1 *NFQ 

PHICN(IW)  =  2 • 0*ATAN ( OMEGA ( IW) ) 

1000  CONTINUE 

WRITE  (6*521)  ( OMEGA ( IW) * AREAL ( I W ) *  PH  I CN ( I W ) *  I W* 1 

*  *  NFQ ) 

521  FORMAT  (1H0*3E15.6) 

NPOWR  =  8 

C  CALCULATE  THE  REAL  PARTS  OF  THE  MAGNITUDE  RATIOS 

C  FROM  PHI  =  0.0  TO  PHI  =  2.0*PI 

CALL  LEASQ( AREAL » PHICN * NFQ* NPOWR  *ACOEF ) 

PHI  ( 1  )  =  0.0 
DO  1002  I PC= 1 *51 
PMAG ( IPC)  =  ACOEF(l) 

DO  1004  K= 1 • NPOWR 

PMAG (IPC)  =  PMAG ( IPC )+ACOEF(K+l)*PHI (IPC) **K 
1004  CONTINUE 

PHKIPC+l)  = 

1002  CONTINUE 
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mainline  fdcpo 


... (CONT'D) 


DO  1200  J I NV  =  5  2*101 
JDUM  =  102-JIMV 
PMAG(JINV)  =  PMAG(JDUM) 

PHI(JINV)  =  PHI (jINV-1 ) +DELPH 
1200  CONTINUE 

WRITE  (6*10) 

10  FORMAT  (///10X* 'VALUES  OF  FOURIER  COEFFICIENTS'/) 

EVALUATE  ALL  FOURIER  COEFFICIENTS  BY  SIMPSON'S 
METHOD 

CALL  QSF ( DELPH ♦ PMAG  » AFOR  » 10 1 ) 

AOFOU  =  AFOR(101>/(2.0*PI) 

WRITE  (6*9)  AOFOU 

9  FORMAT  ( 1  HO  *  1 2X  » ' A  (  0)  ='»E14.6) 

DO  1010  N  =  1  *  20 
DO  1012  IPC=1*101 

EXPRS ( I  PC )  =  PMAG ( I  PC ) *COS ( N*PHI ( I  PC ) ) 

1012  CONTINUE 

CALL  QSF (DELPH»EXPRS»AF  » 1 0 1 ) 

AFOUR(N)  =  AF ( 1 0 1 )  /P I 

C  WRITE  OUT  FOURIER  COEFFICIENTS 

WRITE  (6*11)  N  *  AFOUR ( N ) 

11  FORMAT ( 1H0  * 12X  » ' A  ('»I2»')  ='»E14.6) 

1010  CONTINUE 

9999  CONTINUE 
CALL  EXIT 
END 
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SUBROUTINE  LEASQ 
SUBROUTINE  LEASQ  (Y*X*N»M*A) 
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SUBROUTINE  LEASQ 


PURPOSE 

THIS  SUBROUTINE  IS  USED  TO  FIT  ANY  FUNCTION  BY  A 
POLYNOMIAL  USING  LEAST  SQUARE  METHOD 
THE  POLYNOMIAL  IS  THAT  OF  THE  FOLLOWING  FORM 
Y  =  A (M) *X**M+A (M-l ) #X** (M-l ) +  +A(1)*X+A(0) 


DESCRIPTION  OF  PARAMETERS 

Y  INPUT  VECTOR*  DEPENDENT  VARIABLE 

X  INPUT  VECTOR*  INDEPENDENT  VARIABLE 

N  DIMENSION  OF  INPUT  VECTOR 

M  DEGREE  OF  THE  POLYNOMIAL 

A  COEFFICIENTS  OF  THE  POLYNOMIAL  (M+l)  COEF 


* 


USAGE 

CALL  LEASQ  (Y*X*N*M*A) 


SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
NONE 


REAL  X  (  5  0  )  *  Y  (  5  0  )  *  W ( 2 1 )  *  Z (  11)  »  A ( 1 1 )  *8(11*12) 
LW  =  2*M+1 
LB  =  M+2 
L2  =  M+l 
DO  5  J  =  2  *  LW 

5  W(J)  =  0.0 
W(  1  )  =  N 

DO  6  J= 1  *  LZ 

6  2  <  J  >  =  0.0 

DO  16  I  = 1  *  N 
P  =  1.0 

Z ( 1 )  =  Z ( 1 )+Y ( I ) 

DO  13  J-2*LZ 
P  =  X ( I )*P 
W(J)  ■  W(J)+P 
13  Z(J)  =  Z ( J ) +Y ( I ) *P 
DO  16  J  =  LB ♦ LW 
P  =  X( I )*P 
16  W(J)  =  W ( J ) +P 
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SUBROUTINE  LEASQ  • • « ( CONT  *  D ) 

DO  20  1=1, LZ 

DO  20  K.=  1  *  LZ 

J  =  K+I 

2  0  B  (  K  » I  )  =  W(J-l) 

DO  22  K= 1  *  LZ 
22  B(K»L3)  =  Z ( K ) 

DO  31  L=  1 , LZ 
DIVB  =  B ( L , L ) 

DO  26  J  =  L  ♦  LB 
26  B(L,J)  =  B(L,J) /DIVB 
11  =  L+ 1 

IF  ( I  1-LB )  28,33,33 
28  DO  31  1  =  11 » L Z 
FMULT  =  B(  I  ,L) 

DO  31  J  =  L , LB 

31  B (  I  ,  J  )  =  B( I *J)-B(L*J)*FMULT 
33  A ( LZ )  =  B ( LZ , LB  ) 

I  =  LZ 

CALCULATE  THE  POLYNOMIAL  COEFFICIENTS 

35  SIGMA  =  0.0 
DO  37  J= I , LZ 

37  SIGMA  =  S  I  GMA  +  13  ( I -1 » J ) *A ( J ) 

I  =  1-1 

A (  I )  =  B ( I  , LB ) -S I GMA 
IF  (1-1)  41*41,35 
41  CONTINUE 
RETURN 
END 
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SUBROUT  I  ME  QSF 
SUBROUTINE  QSF  (H»Y*Z*NDIM) 


C 

C 

c 
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SUBROUTINE  QSF 


PURPOSE 

COMPUTE  THE  VECTOR  OF  INTEGRAL  VALUES  FOR  A  GIVEN 
EQUIDISTANT  TABLE  OF  FUNCTION  VALUES 

DESCRIPTION  OF  PARAMETERS 

H  INCREMENT  OF  ARGUMENT  VALUES 

Y  INPUT  VECTOR  OF  FUNCTION  VALUES 

Z  RESULTING  VECTOR  OF  INTEGRAL  VALUES 

Z  MAY  BE  IDENTICAL  TO  Y 
NDIM  DIMENSIONS  OF  VECTOR  Y  AND  Z 

USAGE 

CALL  QSF (H*Y  » Z  *NDIM ) 

SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
NONE 

REMARKS 

NO  ACTION  IN  CASE  NDIM  IS  LESS  THAN  3 

THIS  SUBROUTINE  IS  WRITTEN  BY  IBM  (IBM/1130  S.S.P.) 


DIMENSION  Y ( 6 ) ♦ Z ( 5 ) 

HT=#3333333*H 
I F ( ND IM-5 ) 7  *8*1 

C  NDIM  IS  GREATER  THAN  5.  PREPARATIONS  OF  INTEGRATION 

C  LOOP 


.  1  SUM1  =  Y ( 2 ) +Y ( 2 ) 

SUM1=SUM1+SUM1 

SUM1  =  HT  * ( Y ( 1 ) +SUM1+Y ( 3 )  ) 

AUXl=Y(4)+Y(4) 

AUXl=AUXl+AUXl 

AUX1=SUM1+HT* ( Y ( 3 ) +AUX1+Y ( 5 ) ) 

AUX2=HT* (Y(1)+3«875*(Y(2)+Y(5))+2.625*(Y(3)+Y(4)) 
*  +  Y(6)  ) 

SUM2= Y ( 5 ) +Y ( 5 ) 

SUM2=SUM2+SUM2 

SUM2sAUX2-HT*(Y (4) +SUM2+Y ( 6 ) ) 
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SUBROUTINE  QSF 


••• (CONT‘D) 


2 ( 1 )  =0 • 

AUX  =  Y ( 3 ) +Y ( 3 ) 

AUX=AUX+AUX 

Z ( 2 ) =SUM2-HT* (  Y  (  2  ) +AUX+Y ( 4 ) ) 

Z ( 3 ) =  SUM 1 
Z ( 4 ) =  SUM2 
I F ( ND  IM-6 )  5  *  5  » 2 

INTEGRATION  LOOP 

2  DO  4  1  =  7  *  N  D  I  M  » 2 
SUM1*AUX 1 
SUM2= AUX2 

AUX 1 = Y ( 1-1 )+Y ( 1-1 ) 

AUX1=AUX1+AUX1 

AUX1=SUM1+HT*( Y ( 1-2 )+AUXl+Y( I ) ) 

Z( 1-2 ) =SUM1 
IF ( I-ND I M ) 3 • 6  *6 

3  AUX2= Y ( I ) +Y ( I ) 

AUX2=AUX2+AUX2 

AUX2=SUM2+HT* ( Y  < I  —  1 ) +AUX2  +  Y ( 1  +  1 )  ) 

4  Z<  1-1 )  =  SUM2 

5  Z ( ND I M-l ) = AUX1 
Z  (  NDI  Vi )  *AUX2 
RETURN 

6  Z { NDI M-l ) =SUM2 
Z(NDIM)=AUX1 
RETURN 

END  OF  INTEGRATION  LOOP 

7  I F ( ND IM-3 ) 12  *  1 1  •  8 

ND I M  IS  EQUAL  TO  4  OR  5 

8  SUM2 =1*125 *HT*(Y( 1 ) +Y ( 2 ) +  Y ( 2 ) +Y ( 2 ) +  Y ( 3 ) + Y ( 3 ) +Y ( 3 ) 
*  +  Y<4)  ) 

S U M 1  =  Y  (2  )  +  Y  (2  ) 

SUM1=SUM 1+SUM1 

SUM1  =  HT * (Y(l) +SUM1+Y(  3 )  ) 

Z( 1)=0# 

AUX 1  =  Y  t  3 ) + Y ( 3 ) 

AUX1=AUX1+AUX1 

Z ( 2 ) =SUM2-HT# ( Y ( 2 ) +AUX 1 + Y (4 ) ) 

I F ( ND IM-5 ) 10*9*9 

9  AUX 1= Y ( 4 ) +Y ( 4 ) 

AUX1=AUX1+AUX1 

Z(5)=SUM1+HT*(Y(3)+AUX1+Y(5) ) 

10  Z ( 3 ) =SUM1 
Z ( 4 ) =SUM2 
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SUBROUTINE  QSF 


•  ( CONT ' D  ) 


RETURN 

NDIM  IS  EQUAL  TO  3 

11  SUM1=HT*(1.25*Y<1)+Y(2)+Y(2)-.25*Y(3)> 
SUM2=Y(2)+Y(2) 

SUM2=SUM2+SUM2 
Z(3)=HT*(Y(1)+SUM2+Y(3) ) 

Z  (  1 )  =0 • 

Z ( 2 ) =  SUM  1 

12  RETURN 
END 
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MAINLINE  FDLOO 
MAINLINE  FDLOO 
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*  * 

*  MAINLINE  FDLOO  * 

*  - - - -  # 

*  * 
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PURPOSE 

FIT  THE  FREQUENCY  RESPONSE  DATA  BY  AN  ALGEBRAIC 
EXPRESSION  USING  LEVY'S  CURVE  FITTING  METHOD 
THE  FORM  OF  THE  EXPRESSION  IS  THAT  OF  A  RATIO  OF 
TWO 

FREQUENCY-DEPENDENT  POLYNOMIALS 

A (0 ) +A ( 1 ) *W+A ( 2 ) *W*#2+A ( 3 ) *W**3+. . . 

G  - - 

B (0 ) +B ( 1 ) *W+B ( 2 ) *W*#2+B ( 3 )*W**3+. . . 

WITH  B  (  0 )  =  1.0 

DESCRIPTION  OF  PARAMETERS 
NDATA 

NFQ 

AMAG 
OMEGA 
PH 

AREAL 
A  I  MAG 

NUM 
NDE 

INDEX 


NCASE 
USAGE 

ENTER  DATA  AS  REQUIRED 

SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
SOLEQ *  SECTF 

LISTINGS  OF  SUBROUTINE  SOLEQ  APPEAR  ON  PAGE  B-  42 


NUMBER  OF  DATA  CARDS  OF  EACH  SET  TO  BE 
READ  IN 

NUMBER  OF  DATA  POINTS  TO  BE  USED  IN  THE 

CALCULATIONS 

MAGNITUDE 

FREQUENCY 

PHASE  SHIFT  (EITHER  IN  DEGREES  OR  IN 
RADIANS) 

REAL  COMPONENT  OF  THE  MAGNITUDE  RATIO 
IMAGINARY  COMPONENT  OF  THE  MAGNITUDE 
RATIO 

ORDER  OF  THE  NUMERATOR  OF  THE  POLYNOMIAL 
ORDER  OF  THE  DENOMINATOR  OF  THE 
POLYNOMIAL 

DUMMY  ARGUMENT  WHICH  IS  EQUAL  TO 
0  IF  GIVEN  PHASE  LAGS  ARE  IN  RADIANS 
1  IF  GIVEN  PHASE  LAGS  ARE  IN  DEGREES 
NUMBER  OF  CASES  STUDIED 
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MAINLINE  FDLOO  ...(CQNT'D) 


C 

C  METHOD 

C  COMPLEX  CURVE  FITTING 

C 

C  REFERENCE 

C  LEVY*  E • C • *  'COMPLEX  CURVE  FITTING'*  INSTITUTE  OF 

C  RADIO  ENGINEERE 

C  RADIO  ENGINEERS*  TRANS.  ON  AUTOMATIC  CONTROL*  VOL. 

C  AC-4*  PP.  37-43  >  MAY*  1966. 

C 

C  REMARKS 

C  THIS  METHOD  IS  RESTRICTED  TO  SYSTEMS  HAVING  A 

C  FINITE  MAGNITUDE 

C  AT  ZERO  FREQUENCY 

C 

c 


DIMENSION  OMEGA (50) *AMAG(50) *  PHASE (50)  »PH(50)  *AMAT(50) 
DIMENSION  ALAMD (20) * SSS ( 2 0 ) »TTT(20) *UUU(20)  »RES(20)  * 
1A(  10*20  )  *C(2Q*1 ) 

DIMENSION  AREAL ( 50 ) » A I  MAG ( 50 ) 

DIMENSION  T  I  TLE ( 1 5 ) 

READ  (5*15)  NCASE 
15  FORMAT  (15) 

DO  444  JKL=1* NCASE 

READ  (5  *579  )  (TITLE( I ) *  1  =  1 *15) 

579  FORMAT  ( 15A4) 

READ  (5*1)  NDATA  »  NFQ  *  I NDEX 

1  FORMAT  (315) 

READ  (5*2)  ( OMEGA ( I W ) ♦ AMAT ( I W ) *  PH ( I W )  » I W= 1  *  NDATA ) 

2  FORMAT  ( 5X * F14. 4  * 14X *  FI 1 • 3  * F14 • 3 ) 

COMPUTE  THE  AMPLITUDE  RATIOS  -  NORMALIZE  THE 
MAGNITUDES  OF  THE  30DE  PLOT 

DO  4443  I W  = 1 ♦ N F Q 
AMAG(IW)  =  AMAT ( I W ) /AMAT ( 1 ) 

4443  CONTINUE 

READ  ORDERS  OF  THE  NUMERATOR  AND  THE  DENOMINATOR  OF 
THE  TRANSFER  FUNCTION 

READ  (5*3)  NUM  *  NDE 

3  FORMAT  (215) 

IF (  INDEX-1)  500  *502*500 

500  CONTINUE 

DO  501  I  W= 1  *  NFQ 
PHASE ( IW )  =  PH( IW) 

501  CONTINUE 
GO  TO  503 
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MAINLINE  FDLOO  ...(CONT'D) 


502  CONTINUE 

CONVERSION  PHASE  LAGS  FROM  DEGREES  TO  RADIANS 

PI  =  3.14159265 

DO  503  IW=1 *  N  F  Q 

PHASE ( I W )  *  PH( I W ) *P I / 1 80  •  0 

503  CONTINUE 

CALCULATE  REAL  AND  IMAGINARY  COMPONENTS  OF 
AMPLITUDE  RATIOS 

DO  504  I W= 1  *  NFQ 

AREAL ( I W )  =  AMAG ( IW)*C0S ( PHASE ( IW) ) 

A  I  MAG ( I W )  =  AMAG ( IW)*SIN(PHASE( IW)  ) 

504  CONTINUE 


NUMP  =  NUM+ 1 
NUMDE  =  NUMP+NDE 
NUMD2  =  NUMDE^NUMDE 
NUMP1  =  NUMP+1 
NUMP2  =  NUMP+2 
NDEE  =  NDE#2 
NUMPP  =  NUMP *2 


WRITE  (6*582) 

582  FORMAT  ( 1H1 //// ) 

WRITE  (6  *577)  (TITLE < I ) *  I  =  1 • 15 ) 

577  FORMAT  (15A4) 

C  EVALUATE  LAMDA(I)  *  SCI)  *  TCI)  »  U  C I ) 


1000 


1001 


ALAMD ( 1 ) 
DO  1000 
ALAMD ( I ) 
DO  1000 
ALAMD ( I ) 
CONTINUE 
DO  1001 
<  =  I+l 
TTT ( I )  = 
SSS(K)  = 
DO  1001 
TTT ( I )  = 
SSS(K)  = 
CONTINUE 
SOO  =  0.0 
DO  2500 


=  FLOAT ( NFQ ) 

1  =  3* NUMPP  * 2 
=  0.0 
I  W= 1 *NFQ 

=  ALAMD ( I ) +OMEGA ( I W ) ** ( I“1 ) 
1  =  1  * NUMDE  *2 


0.0 

0.0 

IW=1 *NFQ 

TT  T ( I ) +A I  MAG ( IW)*OMEGA( IW) **I 
SSS ( K ) +AREAL ( I W ) *OMEGA ( I W ) **K 


I W= 1 *NFQ 
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3U/JTZ0D  Ace 


I  •♦•MU/  »  9MU/ 
30/4-qMU/  *  3QMUZ 
3GMU/*3GMU/  *  SGMU/ 
X+9MUZ  =  IQMUZ 

s+qMu/  *  sc^u/ 
S*3G/  =  330/ 

S*qyuz  =  qqviu/ 


isaa«d)  bt i qw 
(wwihi)  TAvqc3  sse 
(  mjTiT)  (vva*2)  btipw 

(AAai)  TAVP03  ,~:e 

*  M>T  •  (1)2  t  (  I  )  AQMAaJ  1TAUJAV3 

( 03/ ) T A0J3  *  ( I ) CM A JA 

StqqMuz«c-i  ocoi  co 
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MAINLINE  FDLOC  ...(CONT'D) 

S00  =  SOO+AREAL ( I W  > 

2500  CONTINUE 

DO  1002  1=2  * NDEE »  2 

UUU( I )  =  0.0 
DO  1002  IW=1*NFQ 

UUU(I)  =  UUU ( I )  +  ( AREAL ( I W ) #AREAL ( I W ) +A I  MAG (  I  W ) 
**A I  MAG ( IW)  )* 

IOMEGA ( IW)**I 
1002  CONTINUE 

C  EVALUATE  ALL  ELEMENTS  OF  COLUMN  MATRIX  C 


C  (  1  *  1  )  = 

SOO 

DO  2501 

1=2  *NUMP*2 

I  Ml  =  I - 

1 

C  (  I  *  1  )  = 

TTT ( I  Ml ) 

2501 

CONTINUE 

DO  2504 

I =3* NUMP *2 

I M 1  =  I- 

1 

C  (  I  *  1  >  = 

SSS< I M 1  ) 

2504 

CONTINUE 

DO  2502 

I = NUMP 1  *  NUMDE  *  2 

C  (  I  *  1 )  = 

0.0 

2502 

CONTINUE 

DO  2503 

I = NUMP 2  *  NUMDE  » 2 

KSI  =  I- 

NUMP 

C  <  I  *  1  )  = 

UUU { KS I ) 

2503 

CONTINUE 

EVALUATE  ALL  ELEMENTS  OF  MATRIX  A 

INITIALLY  »  SET  ALL  ELEMENTS  OF  MATRIX  A  EQUAL  TO  0 

DO  1900  1  =  1  *  NUMDE 

DO  1900  J=l. NUMDE 
A { I  *  J  )  =  0.0 
1900  CONTINUE 

ARRANGE  ALL  ELEMENTS  OF  UPPER  LEFT  CORNER  OF  MATRIX 
A 

DO  2000  1  =  1  * NUMP  *  2 

DO  2000  J  = 1  *  NUMP  »  2 

kj  =  (u-n/2 

KT  =  I+J-l 

A ( I*j)  =  ALAMD(KT)*(-1)**KJ 
2000  CONTINUE 

DO  2001  1=2*  NUMP  *  2 

DC  2001  J  =  2  » NUMP  * 2 
KJ  =  J/2-1 
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MAINLINE  FDLOO 


•  •  • ( CONT  « D ) 


KT  =  I+j-i 

AU»J)  =  ALAMD(KT)*(-1 )**kj 
2001  CONTINUE 


C  ARRANGE  ALL  ELEMENTS  OF  UPPER  RIGHT  CORNER  OF 

C  MATRIX  A 

DO  2002  1  =  1  * NUMP  * 2 

DO  2002  J  =  NUMP 1 » NUMDE  »  2 
KSJ  =  J-NUMP 
KJ  =  (KSJ-l)/2 
KT  =  I+KSJ-I 

A (  I  *  J  )  =  TTT(KT)*(-1)**Kj 

2002  CONTINUE 

DO  2003  1  =  2  *NUMP  *  2 

DO  2003  J  =  NUMP 1  *  NUMDE  »  2 
KSJ  =  J-NUMP 
KJ  =  (KSJ  +  D/2 
KT  =  I+KSJ-1 

A (  I  *  J  )  =  SSS(KT )* (-1 )**KJ 

2003  CONTINUE 

DO  2004  1  =  1*  NUMP  *  2 

DO  2004  J  =  NUMP2  » NUMDE  *  2 
KSJ  =  J-NUMP 
KJ  =  KSJ/2-1 
KT  =  I+KSJ-1 

A (  I  *  j  )  =  SSS(KT)*(-1)**KJ 

2004  CONTINUE 

DO  2005  1  =  2  *  NUMP  *  2 

DO  2005  J  =  NUMP2  »  NUMDE  »  2 
KSJ  =  J-NUMP 
KJ  =  KSJ/2-1 
KT  =  I+KSJ-1 

A (  I  »  J  )  =  TTT(KT)*(-1)**KJ 

2005  CONTINUE 

C  ARRANGE  ALL  ELEMENTS  OF  LOWER  LEFT  CORNER  OF  MATRIX 

C  A 

DO  2006  I=NUMP1 *NUMDE»2 
DO  2006  J= 1  * NUMP  *  2 
KSI  =  I -NUMP 
KJ  =  ( J  —  1  ) / 2 

KT  =  KSI+J-1 

A (  I  *  j  )  =  TTT(KT)*(-1)**Kj 

2006  CONTINUE 

DO  2007  I =NUMP 1  *  NUMDE  *  2 
DO  2007  J  =  2  *NUMP  *  2 
KSI  =  I -NUMP 
KJ  =  J/2 
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•  •  .  ( CONT ‘ D ) 


KT  =  KSI+J-1 

A (  I  *  J  )  =  SS$(KT)*(-1)**KJ 

2007  CONTINUE 

DO  2008  I =NUMP2  *  NUMDE  *  2 
DO  2008  J=1»NUMP»2 
KSI  =  I-NUMP 
KJ  =  (J-l)/2 
KT  =  KSI+J-1 

A ( I  *  J )  =  SSS ( KT ) * (-1 ) **<J 

2008  CONTINUE 

DO  2009  I =NUMP2  » NUMDE  »  2 
DO  2009  J  =  2  *  NUMP  >  2 
KSI  =  I-NUMP 
KJ  =  J/2-1 
KT  =  KSI+J-1 

A ( I  *  J )  =  TTT(KT)*(-1)**KJ 

2009  CONTINUE 


C  ARRANGE  ALL  ELEMENTS  OF  LOWER  RIGHT  CORNER  OF 

C  MATRIX  A 


DO  2010  I =NUMP 1 » NUMDE  *  2 
DO'  2010  J  =  NUMP  1  »  NUMDE  #  2 
KSI  =  I-NUMP 
KSJ  =  J-NUMP 


KJ  =  (KSJ-l)/2 
KT  =  KSI+KSJ 

A ( I  *  j )  =  UUU ( KT ) #( -1 ) *#K  J 

2010  CONTINUE 

DO  2011  I =NUMP2 ♦ NUMDE  *  2 
DO  2011  J=NUMP2*NUMDE*2 
KSI  =  I-NUMP 
KSJ  =  J-NUMP 
KJ  =  KSJ/2-1 
KT  =■  KSI+KSJ 

A  (  I  *  j  )  =  UUU (KT)*(-1)#*KJ 

2011  CONTINUE 

DO  2350  I  =NUMP 1 *  NUMDE  »  2 
•  DO  2350  J  =  NUMP2 ♦ NUMDE  *2 
A (  I  *  J  )  =  0.0 


2350  CONTINUE 

DO  2355  I=NUMP2#NUMDEt2 
DO  2355  J=NUMP 1 »NUMDE  >2 
A (  I  » J  )  =  0.0 
2355  CONTINUE 


C  SOLVE  THESE  EQUATIONS  USING  SUBROUTINE  SOLEQ 


CALL  SOLEQ  ( A » C » NUMDE *  1  * DET * - 1 ) 
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MAINLINE  FDL00  .*.(CONT'D) 

THE  SOLUTIONS  WILL  BE  STORED  IN  THE  MATRIX  RES 

DO  2100  1  =  1  * N U M D E 

RES ( I )  =  C ( I  .1 ) 

2100  CONTINUE 


WRITE  (6*9100) 

9100  FORMAT  ( ///10X *» TRANSFER  FUNCTION  COEFFICIENTS  IN  THE 

*  NUMERATOR' ) 

DO  9101  1  =  1*  NUMP 
K  =  1-1 

WRITE  (6*9102)  K*RES(I) 

9102  FORMAT  (1H0*12X»'A  ('*12*')  =',E12.5) 

9101  CONTINUE 
WRITE  (6*9103) 

9103  FORMAT  (/// 10X *' TRANSFER  FUNCTION  COEFFICIENTS  IN  THE 

*  DENOMINATOR' 

1  ) 

WRITE  (6.9106) 

9106  FORMAT  (1H0»12X.'3  (  0)  =  0.10000E  01') 

DO  9104  I =NUMP 1 >NUMDE 

J  =  I -NUMP 

WRITE  (6*9105)  U»RES(I) 

9105  FORMAT  (1H0*12X*'B  ('*12.')  ='*E12.5) 

9104  CONTINUE 

IF  THE  MODEL  IS  A  SECOND  ORDER  TRANSFER  FUNCTION  * 
CALCULATE  TAU1  *  TAU2  *  AND  THE  GAIN 

IF(NUM)  9001*9000*9001 

9000  CONTINUE 

I F ( NDE-2  )  9001  *9003  *9001 
9003  CONTINUE 

CALL  SECTF ( RES ) 

9001  CONTINUE 
444  CONTINUE 

CALL  EXIT 
END 
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SUBROUTINE  SECTF 
SUBROUTINE  SECTF ( RES ) 


C 
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SUBROUTINE  SECTF 


PURPOSE 

CALCULATE  THE  GAIN*  TAU1*  TAU2  OF  A  SECOND  ORDER 
TRANSFER  FUNCTION  FROM  THE  PARAMETERS  GIVEN  BY  THE 
GENERAL  EXPRESSION  OF  THE  TRANSFER  FUNCTION 

DESCRIPTION  OF  PARAMETERS 

RES  PARAMETERS  GIVEN  BY  THE  GENERAL 

EXPRESSION  OF  THE  TRANSFER  FUNCTION  WHERE 
AO  RES ( 1  ) 

B 1  RES ( 2 ) 

B2  RES ( 3  ) 

USAGE 

CALL  SECTF ( RES ) 

SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
NONE 


DIMENSION  RES ( 2 0 ) 

AO  =  RES ( 1 ) 

B 1  =  RES ( 2 ) 

B2  =  RES ( 3 ) 

DELTA  =  B1*B1-4.0*B2 
I  F ( DELTA  )  1*2*2 

C  THE  TRANSFER  FUNCTION  IS  UNDERDAMPED  -  RETURN 


1  CONTINUE 
RETURN 

C  THE  TRANSFER  FUNCTION  IS  OF  THE  FORM  OF  TWO  FIRST 

C  ORDER  IN  SERIES 

2  CONTINUE 
WRITE  (6*20) 

20  FORMAT  (1H1) 

WRITE  (6*10) 

10  FORMAT  ( ///10X* ' SECOND  ORDER  TRANSFER  FUNCTION 
*  REPRESENTATION ' ) 

TAUA1  =  (B1+SQRT(DELTA) )/2.0 
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SUBROUTINE  SECTF  ...ICONT'D) 

TAUB1  =  ( Bl-SQRT (DELTA) ) / 2 • 0 
WRITE  ( 6  » 1 5  )  TAUA1*TAUB1 

15  FORMAT  (lHOt 12Xf 'TAU1  ='.E12.5»  10X*'TAU2  ='»E12.5) 
RETURN 
END 
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MAINLINE  FDSSO 
MAINLINE  FDSSO 


C 

c 

c 

c 
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***********  ***  *********** 


*  * 

*  MAINLINE  FDSSO  * 

*  -  * 

*  * 


************************* 


PURPOSE 

DETERMINE  THE  TRANSFER  FUNCTION  COEFFICIENTS  FROM 
FREQUENCY  DOMAIN  DATA  USING  STAFFIN  AND  STAFFIN’S 
METHOD 

THE  FORM  OF  THE  EXPRESION  OF  THE  TRANSFER  FUNCTION 
IS  THAT  OF  A  RATIO  OF  TWO  FREQUENCY-DEPENDENT  POLY¬ 
NOMIALS  SUCH  AS  DESCRIBED  BY  EQUATION  (4.3-1B)  OF 
THE  AUTHOR 1 S  THESIS  I.E. 

B(0)+B( 1 )*W+B<2 )*W**2+B(3 )*W**3+.. • 

G  - - 

A(0 )+A( 1 )*W+A(2 ) *W**2+A(3)*W**3+.. . 

WITH  A ( 0 )  =  1.0 


DESCRIPTION  OF  PARAMETERS 

NFQ  NUMBER  OF  DATA  POINTS 

NOPT  INTEGERS  WHICH  DETERMINE  HOW  MANY  DATA 

POINTS  TO  BE  SKIPPED  FOR  EVERY  DATA  POINT 
USED  IN  THE  CALCULATIONS 
OMEGA  FREQUENCY 

PH  PHASE  SHIFT  (EITHER  IN  DEGREES  OR  IN 

RADIANS) 

AREAL  REAL  COMPONENT  OF  THE  MAGNITUDE  RATIO 

A I  MAG  IMAGINARY  COMPONENT  OF  THE  MAGNITUDE 

RATIO 

NUM  ORDER  OF  THE  NUMERATOR  OF  THE  POLYNOMIAL 

NDE  ORDER  OF  THE  DENOMINATOR  OF  THE 


POLYNOMIAL 

INDEX  DUMMY  ARGUMENT  WHICH  IS  EQUAL  TO 

0  IF  GIVEN  PHASE  LAGS  ARE  IN  RADIANS 
1  IF  GIVEN  PHASE  LAGS  ARE  IN  DEGREES 
NCASE  NUMBER  OF  CASES  STUDIED 


USAGE 

ENTER  DATA  AS  REQUIRED 

SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 


s  - 
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MAINLINE  FDSSO  ...(CONT'D) 


C 
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SECTF  *  SOLEQ 

LISTINGS  OF  SUBROUTINE  SOLEQ  APPEAR  ON  PAGE  B-  42 


METHOD 


STAFFIN  AND  STAFFIN'S  METHOD 


REFERENCE 

STAFFIN*  H.K.*  AND  STAFFIN*  R.*  'APPROXIMATING 
TRANSFER  FUNCTIONS  FROM  FREQUENCY  RESPONSE  DATA' 
INSTRUMENTS  AND  CONTROL  SYSTEMS*  VOL.  38*  PP. 
137-144*  FEB.  1965. 


REMARKS 

THIS  METHOD  IS  RESTRICTED  TO  SYSTEMS  HAVING  A 
FINITE  MAGNITUDE 
AT  ZERO  FREQUENCY 


DIMENSION  AREAL ( 50 ) *  AIMAG(50) 

DIMENSION  ADUM (50*5) 

DIMENSION  OMEGA (50) *AMAG(50) *PHASE(50) *PH(50) 
DIMENSION  DAT (10*20) *  RES(20)*  C(10»10) 
DIMENSION  AMAT  (50) 

DIMENSION  T  I  TLE ( 1 5 ) 

READ  (5*15)  NCASE 
15  FORMAT  (15) 

DO  444  JKL- 1 *NCASE 

READ  (5*579) ( T I TLE ( I ) *1=1*15) 

579  FORMAT  (15A4) 

READ  (5*1)  NFQ  *  NOPT  *  I NDEX 

1  FORMAT  (315) 

READ  (5*2)  (OMEGA ( IW) *AMAT ( IW ) *PH( IW) * IW=1 »NFQ) 

2  FORMAT  (5X*F14.4*14X*F11.3*F14.3) 

NORMALIZE  AMPLITUDE  RATIOS 


DO  4443  I W= 1 *NFQ 
AMAG(IW)  =  AMAT ( IW) /AMAT ( 1 ) 

4443  CONTINUE 

READ  ORDERS  OF  THE  NUMERATOR  AND  THE  DENOMINATOR  OF 
THE 

TRANSFER  FUNCTION 

READ  (5*3)  NUM  *  NDE 
3  FORMAT  (215) 
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n  n 


. • . ( CONT ' D ) 


MAINLINE  FDSSO 

IF(INDEX-l)  500*502*500 

500  CONTINUE 

DO  501  I W= 1  * NFQ 
PHASE ( I W )  =  PH { IW) 

501  CONTINUE 
GO  TO  503 

502  CONTINUE 


CONVERT  PHASE  LAGS  FROM  DEGREES  TO  RADIANS 

PI  =  3*14159265 
DO  503  I W  =  1  *  NFQ 
PHASE ( I W )  =  PH ( IW ) *PI /180*0 

503  CONTINUE 

C  CALCULATE  REAL  AND  IMAGINARY  COMPONENTS  OF 

C  AMPLITUDE  RATIOS 

DO  504  I W  =  1 *NFQ 

AREAL ( I W )  -  AM AG ( IW)*C0S(PHASE( IW) ) 

A  I  MAG ( I W  )  =  AM AG ( IW)*SIN(PHASE( IW)  ) 

504  CONTINUE 


NDEP1  =  NDE  +  1 
NDEP2  =  NDE  +  2 
NTOTL  =  NUM+NDE+1 

C  SET  UP  THE  COEFFICIENTS  FOR  MATRIX  DAT 

NTOTV  =  NTOTL*NOPT 
DO  1500  IW=1 *NTOTV*NOPT 
IV  =  I W/NOPT+1 

ADUM (  I W  *  1  )  =  AREAL( I W ) +AIMAG ( IW) 

ADUM (  I W  *  2  )  =  AREAL( IW ) -A  I  MAG ( IW) 

ADUM ( I W  *  3 )  =  -AREAL( IW)-AI MAG ( I W ) 

ADUM (  I W  * 4 )  =  -AREAL ( IW ) +AIMAG ( IW ) 

DO  1100  Js2  *NDEP 1 
JJ  =  J/4 
ISIGN  =  J-JJ#4 
IF  (ISIGN)  1030*1050*1030 
1050  CONTINUE 
ISIGN  =  4 
1030  CONTINUE 
L  =  J-l 

DAT  (  I  V  *  L  )  =  ADUMUW#ISIGN)*0MEGA(IW)**<J-1) 
1100  CONTINUE 

DO  1200  J  =  NDEP 1  •  NTOTL 
NDUM  =  J-NDEP1 
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mainline  fdsso 


• • . ( CONT ' D ) 


DAT(IV*J)  =  -OMEGA ( I W ) *#NDUM 
1200  CONTINUE 
1500  CONTINUE 

DO  1600  IW=1 *NTOTV*NOPT 
IV  =  IW/NOPT+1 

C ( I  V  *  1 )  =  -AREAL ( IW)-AI MAG ( IW) 
1600  CONTINUE 

CALL  SOLEQ  ( DAT >C *NTQTL > 1 *DET #-l ) 
DO  2100  1  =  1  *NTOTL 

RES ( I )  =  C (  I  # 1 ) 

2100  CONTINUE 


WRITE  (6*9103) 

9103  FORMAT  (/ //10X *• TRANSFER  FUNCTION  COEFFICIENTS  IN  THE 

*  DENOMINATOR1 
1  ) 

WRITE  (6*8889) 

8889  FORMAT  (1H0*12X*'A  (  0)  =  0.10000E  01') 

DO  9101  1  =  1*  NDE 
K  =  I 

WRITE  (6*9102)  K*RES(I) 

9102  FORMAT  (1H0*12X*»A  ('*12*')  ='»E12.5) 

9101  CONTINUE 

WRITE  (6*9100) 

9100  FORMAT  ( ///10X* • TRANSFER  FUNCTION  COEFFICIENTS  IN  THE 

*  NUMERATOR' ) 

DO  9104  I  =NDEP 1 *NTOTL 
J  =  I-NDEP1 

WRITE  (6*9105)  J»RES(I) 

9105  FORMAT  (1H0*12X*'B  (  1 • I  2  *  *  )  ='*E12.5) 

9104  CONTINUE 


IF  THE  MODEL  IS  THAT  OF  TWO  FIRST  ORDER  TRANSFER 
FUNCTIONS  IN  SERIES*  DETERMINE  THE  GAIN*  TAU1  AND 
TAU2 

IF(NUM)  9001*9000*9001 

9000  CONTINUE 

I F ( NDE-2  )  9001  *9003*9001 
9003  CONTINUE 

CALL  SECTB ( RES ) 

9001  CONTINUE 
444  CONTINUE 

CALL  EXIT 
END 
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SUBROUTINE  SECTB 
SUBROUTINE  SECTB ( RES ) 


C 

C 

C 

c 
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SUBROUTINE  SECTB 


PURPOSE 

CALCULATE  THE  GAIN*  TAU1*  TAU2  OF  A  SECOND  ORDER 
TRANSFER  FUNCTION  FROM  THE  PARAMETERS  GIVEN  BY  THE 
GENERAL  EXPRESSION  OF  THE  TRANSFER  FUNCTION 

DESCRIPTION  OF  PARAMETERS 

RES  PARAMETERS  GIVEN  BY  THE  GENERAL 

EXPRESSION  OF  THE  TRANSFER  FUNCTION  WHERE 
B 1  RES ( 1 ) 

B2  RES ( 2  ) 

AO  RES ( 3 ) 

USAGE 

CALL  SECTB ( RES ) 

SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
NONE 


DIMENSION  RES ( 2 0 ) 

B 1  =  RES ( 1 ) 

B2  =  RES ( 2 ) 

AO  =  RES ( 3 ) 

DELTA  =  B 1*B 1-4 • Q#B2 
IF (DELTA )  1*2*2 

THE  TRANSFER  FUNCTION  IS  UNDERDAMPED  -  RETURN 


1  CONTINUE 
RETURN 

2  CONTINUE 

THE  TRANSFER  FUNCTION  IS  OF  THE  FORM  OF  TWO  FIRST 
ORDER  IN  SERIES 


WRITE 

(6*20) 

20 

FORMAT 

(  1H1 ) 

WRITE 

(6*10) 

10 

FORMAT 

(/// 10X *' SECOND  ORDER  TRANSFER  FUNCTION 

*  REPRESENTATION ' > 

TAUA1  =  (Bl+SQRTIDELTA) )/2.0 
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SUBROUTINE  SECTB  ...(CONT»D) 

TAUB1  =  ( Bl-SQRT (DELTA) )  /  2  •  0 
WRITE  ( 6  » 15  )  TAUA1 *TAUB1 

15  FORMAT  ( 1HO  * 12X  *  1 TAU1  = •  * E 1 2 . 5 , 1  OX » ' TAU2  = • *  El  2 • 5 ) 
RETURN 
END 
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PURPOSE 

FIT  THE  FREQUENCY-DOMAIN  DATA  BY  SIMPLE  TRANSFER 
FUNCTIONS  USING  ROSENBROCK'S  SEARCH  TECHNIQUES 


DESCRIPTION 

NVAR 

M 


CONVC 
ACONS 
UCONS 
B 1 

STEPS 

NFQ 

OMEGA 

AMAG 

TAU1 

TAU2 

NCASE 


OF  PARAMETERS 

NUMBER  OF  PARAMETERS  TO  BE  OPTIMIZED 
PROGRAM  CONTROL  FLAG 
1  ...  MAXIMIZE  A  FUNCTION 
-1  •••  MINIMIZE  A  FUNCTION 
BASE  POINT  CONVERGENCE  RATIO 
LOWER  LIMITS  FOR  THE  PARAMETERS 
UPPER  LIMITS  FOR  THE  PARAMETERS 
STARTING  POINT 
INITIAL  STEP  SIZE  FOR 
NUMBER  OF  DATA  POINTS 
CALCULATIONS 
FREQUENCY 

MAGNITUDE  OF  THE  BODE 
MINOR  TIME  CONSTANT 
MAJOR  TIME  CONSTANT 
NUMBER  OF  CASES  STUDIED 


THE  PARAMETERS  . 

TO  BE  USED  IN  THE 


PLOT 


USAGE 

ENTER 


DATA  AS  REQUIRED 


SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
RBRCK  *  ADVCE*  CCNTR  *  SOLNS *  FUNC 
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MAINLINE  FDROO  • • i ( CONT  *  D ) 

DIMENSION  AMAG(IOO) 

COMMON /ALE AS/ Y ( 100) .OMEGA (100) *NPTS»SUMSQ 
READ  IN  DATA 

READ  (5*1)  NVAR  *M 

1  FORMAT  (215) 

READ  (5*3)  CONVC 

3  FORMAT  (F10.8) 

READ  (5*2)  ( B1 ( I ) *  1  =  1 *5 ) 

2  FORMAT  (5F10.5) 

READ  (5*4)  (ACONS( I ) » 1=1 *5 ) 

READ  (5*4)  (UCONS( I ) » 1=1 *5 ) 

READ  (5*4)  (STEPS( I ) *1=1*5) 

4  FORMAT  (5F10.3) 

READ  (5*10)  NCASE 

10  FORMAT  ( 15 ) 

DO  9999  ICASE=1 .NCASE 

READ  IN  FREQUENCY  RESPONSE  DATA 

READ  (5*7)  NFQ 
7  FORMAT  ( 15 ) 

NPTS  =  NFQ 

READ  (5*100)  ( OMEGA ( I )  » AMAG ( I )♦ 1  =  1 *40  5 

100  FORMAT  ( 10X*F9*4*17X*F9.4) 

WRITE  OUT  INPUT  DATA 

WRITE  (6*50) 

50  FORMAT ( 1H1 *20X. ' ROSENBRQCK  S  SEARCH  TECHNIQUE»/21X.'- 

1 - »//) 

WRITE  (6*51)  NVAR 

51  FORMAT  (1H0.10X* ‘DIMENSIONS  OF  SPACE  •  ♦ I  3 ) 

WRITE  (6*52)  M 

52  FORMAT  ( 1  HO . 10X * ' CR I  TER  I  ON  -  MAXIMIZE  (  +  1)  ,  MINIMIZE 
*  (-1) • *15) 

WRITE  (6*53)  CONVC 

53  FORMAT  ( 1H0 * 10X * ‘ BASE  POINT  CONVERGENCE  RAT  I  0 • ♦ F14 . 8 ) 
WRITE  (6*54) 

54  FORMAT  ( / / / 1 IX ♦ ‘ I N I T I AL  BASE  POINT') 

WRITE  (6*55)  (  B 1  (  I  )  » I  =  1  *  NVAR ) 

WRITE  (6.56) 

56  FORMAT  (///11X*  'BASIC  STEP  SIZES') 

WRITE  (6*55)  (STEPS( I ) *1=1* NVAR) 

WRITE  (6*57) 

57  FORMAT  ( ///l IX *' UPPER  CONSTRAINTS') 

WRITE  (6.55)  (UCONS( I ) *  I s 1 *NVAR ) 

WRITE  (6*58) 
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MAINLINE  FDROO  ...(CONT'D) 

58  FORMAT  (/// 1 IX *' LOWER  CONSTRAINTS') 

WRITE  (6*55)  ( A CONS ( I ) *  I  =  1  * NVAR ) 

55  FORMAT  <15X,F12.5) 

WRITE  (6*70) 

70  FORMAT  (1H1) 

C  CALCULATE  THE  AMPLITUDE  RATIOS 

DO  3510  I  =  1  *NPTS 
Y ( I )  =  AMAG ( I ) /AMAG ( 1 ) 

3510  CONTINUE 

WRITE  (6*123)  ( OMEGA ( I ) * AMAG ( I ) * Y ( I ) ♦ I =1 *NPTS ) 

123  FORMAT  ( 1H  *3E18.6) 

C  MINIMIZE  THE  FUNCTION  VALUE 

CALL  RBRCK 
TAU1  =  62(1) 

TAU2  =  B2 ( 2 ) 

C  WRITE  OUT  THE  RESULTS 

WRITE  (6*61) 

61  FORMAT  (///27X* 'PROCESS  PARAMETERS • /27X * ' - 

* - »  //  ) 

WRITE  (6*62)  TAU1 *  T  AU2 

62  FORMAT  ( 1  HO  * 20X *  '  T AU1  = ' *  FI  5 . 3 *7X * ' TAU2  ='.F15.3) 
9999  CONTINUE 

CALL  EXIT 
END 


(G’T/.QDJ...  QQfiCR  3tf!JtfIAv‘ 

I  -  T2  ‘0}  c*  v0  J  •  ♦  XX  I\\  \  )  TAM903  8  8 

(s3Avntiai»<neno3A)  {ee»d)  3ti*w 

<e«si3tX5i)  TAMfloi  ee 
(C^-fd)  3TIPW 
(IHI)  T A  !fl03  OV 

£0IT A-  laUTlJQMA  3HT  3TAJU3JA3 

8Tqnti«i  cies  oa 

( r )DAVA\ { I ) uAMA  *  (I) v 

3uniT'/co  ciee 

(  2  i  ST ♦  I  *  I «  {  I  )  Y  ♦  (  2  )  DAMA  «  (  I  )  A03v10  )  (£SX«d)  3TI9W 

( d •  8 X 3£ •  Nil  TAMA01  £SI 

3LJAV  /C I T3/U3  3HT  3MMI/IM. 


*3«8P  J J A3 
(X)S8  *  XU AT 
(S)S8  *  SUAT 

aTJU53fl  3HT  TUO  STlflW 

t  Xd#d)  3TIAW 

» f xrs\»ss3T3MASAq  ae33c«q‘  #xrs\\\>  tamao^  id 

( \  \  • - * 

lr  ^  SUAT • XUAT  (Sdtd)  3T I flW 

'  "•Ci  *  *  SUAi  *XT#£.c!X3*  •  -  XUAT  •  •  XOS»  GHX  )  TAMf!03  Sd 

3  JV1 1  TH03  99$o 
TIX3  J J A3 
QM3 


e-  72 


FUNCTION  FUNC 
FUNCTION  FUNC  ( NVAR *B2 ) 


C 

C 

C  FUNCTION  FUNC 

C  - 

c 

c 

C  PURPOSE 

C  COMPUTE  THE  VALUE  OF  THE  FUNCTION  TO  BE  OPTIMIZED 

C  THE  MODEL  IS  THAT  OF  TWO  FIRST  ORDER  TRANSFER 

C  FUNCTIONS  IN  SERIES 

C 

C  DESCRIPTION  OF  PARAMETERS 

C  NVAR  NUMBER  OF  PARAMETERS  TO  BE  OPTIMIZED 

C  B2  VALUES  OF  THE  RESPECTIVE  PARAMETERS 

C 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  NONE 

C 
C 


COMMON/ALEAS/Y ( 100) *OMEGA( 100 ) #NPTS»SUMSQ 
DIMENSION  B2 ( 5 ) 

TAU1  =  B2 ( 1 ) 

TAU2  =  B2(2) 

SUMSQ  =  0.0 
DO  100  I  =  1  *  NPTS 

TERM1  =  TAU1*TAU1*0MEGA( I )*OMEGA( I J+1.0 
TERM2  =  TAU2*TAU2*OMEGA( I )*OMEGA( I J+1.0 
AMODL  =  1.0/SQRT(TERM1*TERM2) 

SUMSQ  =  SUMSQ+ ( Y ( I ) -AMODL ) **2 
100  CONTINUE 

FUNC  =  SUMSQ 

RETURN 

END 
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APPENDIX  C 

LISTINGS  OF  CSMP  PROGRAMS 


Since  the  complete  listings  of  all  CSMP  programs  which 
have  been  used  during  the  present  investigation  would  be  too  voluminous, 
only  some  typical  S/360  CSMP  programs  are  included  in  this  appendix, 
namely  the  control  of  top  product  composition  by  manipulation  of  re¬ 
flux  flow,  the  control  of  the  liquid  temperature  on  intermediate  tray 
8  by  manipulation  of  reflux  flow  and  the  control  of  bottom  product 
composition  by  manipulation  of  steam  flow  using  the  data  as  given  by 
the  models  of  the  University  of  Alberta  distillation  column. 

Use  of  these  programs  for  similar  simulation  problems 
necessitates  proper  modifications  of  the  programs  using  appropriate 
data. 
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* 

# 

* 

* 

* 

* 

# 

TITLE 

* 

# 


CONTINUOUS  SYSTEM  MODELING  PROGRAM 


*  * 

CONTROL  OF  TOP  PRODUCT  COMPOSITION 
*  # 

*  #  •#  #  #  *  -*  *  *  *  *  -k-  *  #  #  *  *  *  •}(•  *  *  #  *  *  *  #  *  *  #  #  *  #.  *  #.  *-  *  *  #  *  #  *  *  *  * 
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# 
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* 
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DESCRIPTIONS  OF  PARAMETERS 

GDF  TRANSFER  FUNCTION  OF  XD  FOR  LOAD  CHANGES 

GDM  TRANSFER  FUNCTION  OF  XD  FOR  CHANGES  IN 

THE  MANIPULATIVE  VARIABLE 
GWF  TRANSFER  FUNCTION  OF  XW  FOR  LOAD  CHANGES 

GWM  TRANSFER  FUNCTION  OF  XW  FOR  CHANGES  IN 

THE  MANIPULATIVE  VARIABLE 
ERRES  I.S.E.  OF  TOP  PRODUCT  COMPOSITION 

ERRW2S  I.S.E.  OF  BOTTOM  PRODUCT  COMPOSITION 
AKT  AKC*AKV*AKM 

AKC  GAIN  OF  THE  FEEDBACK  CONTROLLER 

AKV  GAIN  OF  THE  CONTROL  VALVE 

AKM  GAIN  OF  THE  SENSING  ELEMENT 

AKM  GAIN  OF  THE  SENSING  ELEMENT 

TAUI  INTEGRAL  TIME  (MIN.) 

XD  TOP  PRODUCT  COMPOSITION 

XW  BOTTOM  PRODUCT  COMPOSITION 

FF  LOAD  CHANGES 

SETPT  SET  POINT 


*  USAGE 

*  IF  FEEDBACK  CONTROL  ONLY  IS  DESIRED*  SET  AKFF  =  0.0 

* 

*  REMARKS 

*  SIMULATION  USING  DATA  FROM  THE  U.  OF  A.  DISTILLATION 

*  COLUMN 

* 


*  DATA  REQUIRED  FOR  THE  SIMULATION 

#  - - - — - - 

*  DATA  FOR  THE  TRANSFER  FUNCTION  GDM 

PARAMETER  AKDM  s  19.730*  TAUDM1  =  0.520*  TAUDM2  *  27.659 

PARAMETER  TDLYDM  =  0.000 

#  DATA  FOR  THE  TRANSFER  FUNCTION  GWM 

PARAMETER  AKWM  =  4#896*  TAUWM1  =  2.717*  TAUWM2  =  13.675 

PARAMETER  TDLYWM  =  4.500 
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*  DATA  FOR 
PARAMETER 
PARAMETER 

*  DATA  FOR 
PARAMETER 
PARAMETER 

*  DATA  FOR 
PARAMETER 

*  DATA  FOR 
PARAMETER 

*  DATA  FOR 
PARAMETER 

*  FORCING 
PARAMETER 

*  SETPOINT 
CONSTANT 

* 


THE  TRANSFER  FUNCTION  GDF 

AKDF  =  6.455*  TAUDF1  =  5.143*  TAUDF2  =  18.243 

TDLYDF  =  3.467 
THE  TRANSFER  FUNCTION  GWF 

AKWF  =  3.657*  TAUWF1  =  0.628*  TAUWF2  =  12.889 

TDLYWF  =  3.649 
THE  CONTROL  VALVE 
AKV  =  1.000 

THE  SENSING  ELEMENT  FOR  TOP  PRODUCT  COMPOSITION 
AKD  =  1.000 

THE  SENSING  ELEMENT  OF  BOTTOM  COMPOSITION 
AKW  =  1.000*  TDLYW  =  2.500 
FUNCTION 

FF  =  0.430 

SETPT  =  0.000 


*  FEEDBACK  CONTROLLER  CONSTANT 

PARAMETER  AKT  =  120.0 

*  INTEGRAL  TIME  CONSTANT 

PARAMETER  TAUI  =  10.0 

*  - - - 


INITIAL 

*  INITIALIZE  PROCESS  PARAMETERS 
AMEAS  =  0.0 


DYNAMIC 

*  DYNAMIC  SECTION  OF  THE  MODEL 

*  DEVIATION  FROM  SETPOINT 

ERROR  =  SETPT-AMEAS 

*  PROPORTIONAL  CONTROLLER  CONSTANT 

AKC  =  AKT/ ( AKV*AKM) 

*  FEEDBACK  CONTROLLER  (  PROPORTIONAL  PLUS  INTEGRAL  ) 

CONT  =  ERROR+INTGRL(0.0*  ERROR/TAU I ) 

CONTRL  =  AKC*CONT 

*  FEEDFORWARD  CONTROLLER  CONSTANT 

AKGP  =  AKDM 

AKGL  =  AKDF 

AKFF  =  AKGL/( AKGP*AKV) 

*  FEEDFORWARD  COMPENSATION 

FEEDFD  *  -FF*AKFF 

*  SIGNAL  TO  THE  VALVE 

SIGNAL  =  CONTRL+FEEDFD 

*  VALVE  OUTPUT 

VALVE  =  AKV*S I GNAL 

*  DISTURBANCE  ON  TOP  PRODUCT  COMPOSITION 

GDF1  =  REALPL ( 0.0 »TAUDF1 *  F  F ) 
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GDF2 

=  REALPL(0.0*TAUDF2*GDF1) 

GDF3 

=  DELAY (  13  *  TDLYDF  *GDF2 ) 

GDF 

=  GDF3*AKDF 

*  CORR 

ECTIVE  ACTION  ON  TOP  PRODUCT  COMPOSITIC 

GDM1 

=  REALPL ( 0 • 0  *  TAUDM1 * VALVE ) 

GDM2 

=  REALPL ( 0.0 »TAUDM2 *GDM1 ) 

GDM 

=  GDM2*AKDM 

*  TOP 

PRODUCT  COMPOSITION 

XD1 

=  GDF+GDM 

XD 

=  XD1*AKD 

*  MEASUREMENT  OF  OUTPUT 

AMEAS 

=  XD*AKD 

*  DISTURBANCE  ON  BOTTOM  PRODUCT  COMPOSITION 

GWF1 

=  REALPL(0#0»TAUWF1*FF) 

GWF2 

=  REALPL(0.0»TAUWF2*GWF1) 

GWF3 

=  DELAY ( 14*TDLYWF*GWF2 ) 

GWF 

=  GWF3*AKWF 

*  CORRECTIVE  ACTION  ON  BOTTOM  PRODUCT  COMPOS 

GWM1 

=  REALPL ( 0«  0  »  TAUWM1 » VALVE ) 

GWM2 

=  REALPL ( 0.0 #TAUWM2 *GWM1 ) 

GWM3 

=  DELAY( 17*TDLYWM»GWM2) 

GWM 

=  GWM3*AKWM 

*  BOTTOM  PRODUCT  COMPOSITION 

XWC 

=  GWF+GWM 

XW1 

=  DELAY ( 10 »TDLYW »XWC ) 

xw 

=  XW1#AKW 

*  DEVIATION  OF 

XW  FROM  SETPOINT 

ERRW 

=  SETPT-XWC 

*  ERROR  DETECT 

ING  CIRCUIT 

ERROR2 

=  ERROR*ERROR 

ERRW  2 

=  ERRW*ERRW 

ERRES 

=  INTGRL(0.0»ERROR2) 

ERRW2S 

=  INTGRL(0.0»ERRW2J 

TIMER 

DELT  =  0 

•20*  FINTIM=120.0*  PRDEL=1.C* 

PRINT 

XD  *  XW  > 

ERRES  *  ERRW2S 

LABEL 

(RD-FB-FF-TAUI=10.0) 

PRTPLT 

XD  *  XW 

END 

STOP 

ENDJOB 

OUTDEL= 1  •  0 
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CONTINUOUS  SYSTEM  MODELING  PROGRAM 
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CONTROL  OF  THE  LIQUID  TEMPERATURE  ON 
INTERMEDIATE  TRAY  8 

#  * 
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DESCRIPTIONS  OF  PARAMETERS 

GDF  TRANSFER  FUNCTION  OF  XD  FOR  LOAD  CHANGES 

GDM  TRANSFER  FUNCTION  OF  XD  FOR  CHANGES  IN 

THE  MANIPULATIVE  VARIABLE 
GWF  TRANSFER  FUNCTION  OF  XW  FOR  LOAD  CHANGES 

GWM  TRANSFER  FUNCTION  OF  XW  FOR  CHANGES  IN 

THE  MANIPULATIVE  VARIABLE 
G8F  TRANSFER  FUNCTION  OF  C8  FOR  LOAD  CHANGES 

G8M  TRANSFER  FUNCTION  OF  C8  FOR  CHANGES  IN 

THE  MANIPULATIVE  VARIABLE 
ERRW2S  I.S.E.  OF  BOTTOM  COMPOSITION 

ERRD2S  I.S.E.  OF  TOP  PRODUCT  COMPOSITION 

ERRES  I.S.E.  OF  THE  CONTROLLED  VARIABLE 

XD  TOP  PRODUCT  COMPOSITION 

XW  BOTTOM  PRODUCT  COMPOSITION 

C8  TEMPERATURE  (OR  COMPOSITION)  OF  THE  LIQUID 

ON  TRAY  8 

AKT  AKC*AKV*AKM 

AKC  GAIN  OF  THE  FEEDBACK  CONTROLLER 

AKV  GAIN  OF  THE  CONTROL  VALVE 

A KM  GAIN  OF  THE  SENSING  ELEMENT 

TAUI  INTEGRAL  TIME  (MIN. ) 

FF  LOAD  CHANGES 

SETPT  SET  POINT 


USAGE 

IF  FEEDBACK  CONTROL  ONLY  IS  DESIRED*  SET  AKFF  =  0.0 


REMARKS 

SIMULATION  USING  DATA  FROM  THE  U.  OF  A.  DISTILLATION 
COLUMN 


# 

*  DATA  REQUIRED  FOR  THE  SIMULATION 

#  - - - - 

*  DATA  FOR  THE  TRANSFER  FUNCTION  GDM 

PARAMETER  AKDM  *  19.730*  TAUDM1  =  0.520*  TAUDM2  s  27.659 

PARAMETER  TDLYDM  =  0.0 

*  DATA  FOR  THE  TRANSFER  FUNCTION  GWM 

PARAMETER  AKWM  =  4.896*  TAUWM1  =  2.717*  TAUWM2  =  13.675 

PARAMETER  TDLYWM  =  4.500 
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*  DATA  FOR 
PARAMETER 
PARAMETER 

*  DATA  FOR 
PARAMETER 
PARAMETER 

*  DATA  FOR 
PARAMETER 
PARAMETER 

*  DATA  FOR 
PARAMETER 
PARAMETER 

*  DATA  FOR 
PARAMETER 

*  DATA  FOR 
PARAMETER 

*  DATA  FOR 

*  COMPOS  IT 
PARAMETER 

*  DATA  FOR 
PARAMETER 

* 

*  SETPOINT 
CONSTANT 

* 


THE  TRANSFER  FUNCTION  G8M 

AK8M  =  -10 • 780  *  TAU8M1  =  0.422*  TAU8M2  =  20.569 
TDLY8M  =  0.0 

THE  TRANSFER  FUNCTION  GDF 

AKDF  =  6.455  ♦  T  AUDF1  =  5.143  *  TAUDF2  =  18.243 
TDLYDF  =  3.467 

THE  TRANSFER  FUNCTION  GWF 

AKWF  =  3.657*  TAUWF1  =  0.623*  TAUWF2  =  12.889 
TDLYWF  =  3.649 

THE  TRANSFER  FUNCTION  G8F 

AK8F  =  -4.078*  TAU8F1  =  4.327  *  T  AU8F2  =  13.330 
TDLY8F  =  3.467 

THE  CONTROL  VALVE 
AKV  =  1.000 

THE  SENSING  ELEMENT  FOR  TOP  PRODUCT  COMPOSITION 
AKD  =  1.000 

THE  SENSING  ELEMENT  OF  THE  TEMPERATURE  (OR 
ION)  ON  INTERMEDIATE  TRAY  8 
AKC3  =  1.000 

THE  SENSING  ELEMENT  OF  BOTTOM  COMPOSITION 
AKW  =  1.000*  TDLYW  =  2.500 


SETPT  =  0.0 


*  FORCING  FUNCTION 

PARAMETER  FF  =  0.430 

* 


*  FEEDBACK  CONTROLLER  CONSTANT 

PARAMETER  AKT  =  224.0 

*  INTEGRAL  TIME  CONSTANT 

PARAMETER  TAUI  =  10.0 

*  — - — - - 


INITIAL 

*  INITIALIZE  PROCESS  PARAMETERS 
AMEAS  =  0.0 


DYNAMIC 

*  DYNAMIC  SECTION  OF  THE  MODEL 

*  DEVIATION  FROM  SETPOINT 

ERROR  =  SETPT+AMEAS 

*  PROPORTIONAL  CONTROLLER  CONSTANT 

AKC  =  AKT/ ( AKV*AKM) 

*  FEEDBACK  CONTROLLER  (  PROPORTIONAL  PLUS  INTEGRAL  ) 

CONT  =  ERROR+ I NTGRL ( 0 .0  *  ERROR /TAUI ) 

CONTRL  =  AKC*CONT 

*  VALVE  OUTPUT 

VALVE  =  AKV*CONTRL 
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DISTURBANCE 

G8F1 

G8F2 

G8F3 

G8F 

CORRECTIVE 

G8M1 

G8M2 

G8M 


ON  THE  LIQUID  TEMPERATURE  ON  TRAY  8 
=  REALPL ( 0 • 0  * TAU8F1 *FF 5 
=  REALPL ( 0.0 >TAU8F2 »G8F1 ) 

■  DELAY! 13*TDLY8F*G8F2 ) 

=  G8F3*AK8F 

ACTION  ON  THE  LIQUID  TEMPERATURE  ON  TRAY  8 

*  REALPL ! 0.0 *TAU8M1 *VALVE ) 

*  REALPL ! 0* 0  * TAU8M2 *G8M1 ) 

=  G8M2*AK8M 


*  LIQUID  TEMPERATURE  ON  INTERMEDIATE  TRAY  8 


C  8 

MEASUREMENT 

AMEAS 

DISTURBANCE 

GDF1 

GDF2 

GDF3 

GDF 

CORRECTIVE 

GDM1 

GDM2 

GDM 


=  G8F+G8M 
OF  OUTPUT 
=  C8*AKC8 

ON  TOP  PRODUCT  COMPOSITION 
=  REALPL ( 0.0 *TAUDF1 *FF) 

=  REALPL ( 0.0 *TAUDF2 *GDF1 ) 

=  DELAY! 13  >  TDLYDF  *  GDF2 ) 

=  GDF3*AKDF 

ACTION  ON  TOP  PRODUCT  COMPOSITION 
=  REALPL (0.0 »TAUDM1 tVALVE ) 

=  REALPL  !  0.0 *TAUDM2 »GDM1 ) 

=  GDM2*AKDM 


TOP  PRODUCT 

COMPOSITION 

XD1 

= 

GDF+GDM 

XD 

- 

X  D 1  *  A  K  D 

■tt 

DEVIATION  OF 

XD 

FROM  SETPOINT 

ERRD  = 

SETPT-XD 

DISTURBANCE 

ON 

BOTTOM  PRODUCT  COMPOSITION 

GWF1 

- 

REALPL(Q.0*TAUWF1*FF) 

GWF2 

= 

REALPL ( 0.0  #TAUWF2 iGWFl ) 

GWF3 

= 

DELAY! 1C  *  TDLYWF  *GWF2 ) 

GWF 

= 

GWF3*AKWF 

CORRECTIVE  ACTION  ON  BOTTOM  PRODUCT  COMPOS 

GWM1 

= 

REALPL (0.0* TAUWM1 ♦ VALVE ) 

GWM2 

s 

REALPL (0.0*TAUWM2 *GWM1 ) 

GWM3 

as 

DELAY! 12  *  TDLYWM  *GWM2 ) 

GWM 

as 

GWM3*AKWM 

BOTTOM  PRODUCT 

COMPOSITION 

XWC 

= 

GWF+GWM 

* 

BOTTOM  PRODUCT 

COMPOSITION  MEASURED  BY  THE 

XW1 

- 

DELAY! 1 0  »  TDLYW  *  XWC ) 

xw 

s 

X  W 1  *  A  K  W 

DEVIATION  OF 

XW 

FROM  SETPOINT 

ERRW 

SETPT-XWC 

ERROR  DETECT 

ING 

CIRCUIT 

ERROR2 

s 

ERROR-TERROR 

ERRD2 

— 

ERRD#ERRD 

ERRW2 

= 

ERRW*ERRW 

ERRES 

- 

INTGRL!0.0»ERROR2) 

ERRD2S 

a 

INTGRL(0.0*ERRD2) 

ERRW2S 

s 

INTGRL ( 0.0  *ERRW2 ) 
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# 

*  TERMINAL  SECTION  OF  THE  MODEL 
TERMINAL 

TIMER  DELT=0.20*  F I  NT  I M* 120 . 0  *  PRDEL=1.0*  OUTDEL=1.0 
PRINT  XD »  VALVE*  C8,  XW»  ERRES *  ERRD2S »  ERRW2S 
PRTPLT  XD*  XW»  C8 

LABEL  (R8-F3-FF-TAUI=10.0 ) 

END 

STOP 

ENDJOB 
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*  CONTINUOUS  SYSTEM  MODELING  PROGRAM 

ft  - _ - - - - - - 

ft 

ft 

*  ##•###*###■***##*###*#*■*#**##*#*##*#*#*#*###*#### 

*  *  * 

TITLE  CONTROL  OF  BOTTOM  PRODUCT  COMPOSITION 

ft  ft  * 


#  *  *  ft  ft  ft  ft  ft  ft  ft  *  ft  ft  *  *  *  ft  ft  *  ft  ft  ft  ft  ft  -if  ft  ft  ft  ft  ft  ft  *  *  *  *  *  ft  *  *  *  *  ft  *  *  *  *  *  ft 

ft 

ft 


ft 

DESCRIPTIONS 

OF  PARAMETERS 

ft 

GDF 

TRANSFER  FUNCTION  OF  XD  FOR  LOAD  CHANGES 

ft 

GDM 

TRANSFER  FUNCTION  OF  XD  FOR  CHANGES  IN 

ft 

ft 

GWF 

THE  MANIPULATIVE  VARIABLE 

TRANSFER  FUNCTION  OF  XW  FOR  LOAD  CHANGES 

ft 

GWM 

TRANSFER  FUNCTION  OF  XW  FOR  CHANGES  IN 

ft 

ft 

GR 

THE  MANIPULATIVE  VARIABLE 

TRANSFER  FUNCTION  FOR  THE  REBOILER 

ft 

AKT 

AKC*AKV*AKM 

ft 

AKC 

GAIN  OF  THE  FEEDBACK  CONTROLLER 

ft 

AKV 

GAIN  OF  THE  CONTROL  VALVE 

ft 

AKM 

GAIN  OF  THE  SENSING  ELEMENT 

ft 

TAUI 

INTEGRAL  TIME  (MIN.) 

ft 

ERRES 

I.S.E.  OF  BOTTOM  PRODUCT  COMPOSITION 

ft 

ERRD2S 

I  .  S  «  E  *  OF  TOP  PRODUCT  COMPOSITION 

ft 

XD 

TOP  PRODUCT  COMPOSITION 

ft 

XW 

BOTTOM  PRODUCT  COMPOSITION 

ft 

FF 

LOAD  CHANGES 

ft 

SETPT 

SET  POINT 

ft 


*  USAGE 

ft  IF  FEEDBACK  CONTROL  ONLY  IS  DESIRED*  SET  AKFF  =  0.0 

*  REMARKS 

*  SIMULATION  USING  DATA  FROM  THE  U*  OF  A.  DISTILLATION 

*  COLUMN 

ft 


*  DATA  REQUIRED  FOR  THE  SIMULATION 


ft  — - 

*  DATA  FOR 
PARAMETER 
PARAMETER 

*  DATA  FOR 

parameter 

PARAMETER 

*  DATA  FOR 
PARAMETER 
PARAMETER 


THE  TRANSFER  FUNCTION  GDM 

AKDM  =  -24.802*  TAUDMl  =  4.054*  TAUDM2 
TDLYDM  =  1*067 
THE  TRANSFER  FUNCTION  GWM . 

AKWM  =  -14.038*  TAUWM1  =  2.120*  TAUWM2 
TDLYWM  =  3.326 
THE  TRANSFER  FUNCTION  GDF 

AKDF  =  6.455*  TAUDFl  =  5.143*  TAUDF2 

TDLYDF  =  3.467 


16.031 


14.250 


18.243 
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*  DATA  FOR 

parameter 

PARAMETER 

*  DATA  FOR 
PARAMETER 

*  DATA  FOR 
PARAMETER 

*  DATA  FOR 
PARAMETER 

*  DATA  FOR 
PARAMETER 

*  SETPOINT 
CONSTANT 

*  FORCING 
PARAMETER 

*  FEEDBACK 
PARAMETER 

*  INTEGRAL 
PARAMETER 

*  - — - - 


THE  TRANSFER  FUNCTION  GWF 

AKWF  =  3.657*  TAUWF1  =  0.628*  TAUWF2  =  12.889 

TDLYWF  =  3.649 

THE  TRANSFER  FUNCTION  GR 
AKR  =  1.000 
THE  CONTROL  VALVE 
AKV  =  1.000 

THE  SENSING  ELEMENT  FOR  TOP  PRODUCT  COMPOSITION 
AKD  =  1.000 

THE  SENSING  ELEMENT  OF  BOTTOM  COMPOSITION 
AKW  =  1.000*  TDLYW  =  2.500 

SETPT  =  0.000 
FUNCTION 

FF  =  0.430 

CONTROLLER  CONSTANT 
AKT  =  0.20 
TIME  CONSTANT 
TAU I  =  10.0 


INITIAL 

*  INITIALIZE  PROCESS  PARAMETERS 

AMEAS  =  0.0 

# 


DYNAMIC 

*  DYNAMIC  SECTION  OF  THE  MODEL 

*  DEVIATION  FROM  SETPOINT 

ERROR  =  SETPT+AMEAS 

*  PROPORTIONAL  CONTROLLER  CONSTANT 

AKC  =  AKT/(AKV*AKM*AKR) 

*  FEEDBACK  CONTROLLER  (  PROPORTIONAL  PLUS  INTEGRAL 

CONT  =  ERROR+INTGRL(0.0*ERROR/TAUI ) 
CONTRL  =  AKC* CONT 


FEEDFORWARD 

AKGP 

AKGL 

AKFF 

FEEDFORWARD 

FEEDFD 


CONTROLLER  CONSTANT 
=  AKWM 
=  AKWF 

=  AKGL /( AKGP *AKV* AKR ) 
COMPENSATION 
=  -FF*AKFF 


SIGNAL  TO  THE 
SIGNAL 
VALVE  OUTPUT 
REBLER 
REBOIL  VAPOR 
VALVE 


VALVE 

=  CONTRL+FEEDFD 
(STEAM  FLOW  RATE) 
=  S I GNAL#AKR 
RATE 

=  AKV#REBLER 
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DISTURBANCE 

GWF1 

GWF2 

GWF3 

GWF 

CORRECTIVE 

GWM1 


ON  BOTTOM  PRODUCT  COMPOSITION 
=  REALPL ( 0 • 0  *  TAUWF1 *FF ) 

=  REALPL ( O.C *TAUWF2 *GWF1 ) 

*  DELAY ( 10*TDLYWF*GWF2 ) 

=  GWF3*AKWF 

ACTION  ON  BOTTOM  PRODUCT  COMPOSITION 
=  REALPL(0.0»TAUWM1*VALVE) 


GWM2  =  REALPL(0.0*TAUWM2>GWM1 ) 

GWM3  =  DELAY (  2  »  TDLYWM * GWM2 ) 

GWM  =  GWM3*AKWM 

BOTTOM  PRODUCT  COMPOSITION 


XW 

*  MEASUREMENT 

AMEA 
AMEAS 

*  DISTURBANCE 

GDF 1 
GDF2 
GDF3 
GDF 

*  CORRECTIVE 

GDM1 

GDM2 

GDM3 

GDM 

*  TOP  PRODUCT 

XD1 

XD 

*  DEVIATION  OF 


=  GWF+GWM 
OF  OUTPUT 

=  DELAY ( 10#  TDLYW  *  XW ) 

=  AMEA*AKW 

ON  TOP  PRODUCT  COMPOSITION 
=  REALPL ( 0*0 »TAUDF1»FF) 

=  REALPL(Q.0*TAUDF2*GDF1> 

=  DELAY ( 13*TDLYDF*GDF2) 

=  GDF3*AKDF 

ACTION  ON  TOP  PRODUCT  COMPOSITION 
=  REALPL(0.0»TAUDM1*VALVE) 

=  REALPL ( 0  * 0 *  TAUDM2  » GDM1 ) 

=  DELAY (  4  *TDLYDM*GDM2 ) 

=  GDM3*AKDM 
COMPOSITION 
=  GDF+GDM 
=  XD1*AKD 
XD  FROM  SETPOINT 


ERROR 


ERRD  =  SETPT-XD 
DETECTING  CIRCUIT 
ERROR2 
ERRD2 
ERRES 
ERRD2S 


TIMER 

PRINT 

LABEL 

PRTPLT 

END 

STOP 

ENDJOB 


=  ERROR*ERROR 
=  ERRD*ERRD 
=  INTGRL(0.0*ERROR2) 

=  INTGRL ( 0#0 *ERRD2 ) 
DELT=0»20»FINTIM=120.0»PRDEL=1.0*OUTDEL=1.0 
XD  *  XW*  ERRES*  ERRD2S 

( SW-FB-FF-TAUI =10«0 ) 

XD*  XW 
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APPENDIX  D 

LISTINGS  OF  PROCESS  PROGRAMS 

The  first  part  of  this  appendix  contains  all  the  necessary 
DDC  control,  data  accumulation  loops  and  ring  buffers  which  have  been 
employed  during  the  experimental  work.  Exponential  filters  and  thermo¬ 
couple  break  filters  have  been  used  in  all  flow  loops  and  temperature 
loops  respectively  to  smooth  the  noisy  data.  A  filter  constant  3  =  0.80 
has  been  associated  with  all  the  flow  loops  and  a  filter  constant  3  = 
0.75  has  been  used  in  all  the  temperature  loops  to  attenuate  the  noise. 

The  second  part  of  this  appendix  contains  the  listings  of  all 
process  programs  which  have  been  used  in  this  work,  namely: 

1 .  DASS 

2.  0N0FF 

3.  GTDAT 

Associated  subprograms  and  subroutines  which  have  been  written 
for  each  of  these  programs  are  included  immediately  following  the  main 
program.  Also  included  in  this  appendix  is  a  typical  output  of  the 
process  program  DASS. 
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GAS  CHROMATOGRAPH  LOOP  RECORDS 


ID 

=  0201 

G  •  C  • 

DATA  ACQUISITION 

LOOP 

01 

4010 

0004 

004D  0000 

BFOO 

7FFF  0000  0000 

0000  0000 

02 

0000 

0000 

7FFF  0000 

0000 

ID 

=  0202 

G.  C. 

DATA  ACCUMULATION 

LOOP 

01 

067F 

0000 

0201  0000 

0000 

0000 

*  -a 


mT  0000  0000 


'  JO0A  atac  O  .0 

I0S0  0000  ITdO 


D“  3 


DATA  ACQUISITION  LOOP  RECORDS 


A. 

CONTROL  OF  THE  LIQUID 

TEMPERATURE  ' 

ON  AN  INTERMED 

1 1  ATE 

TRAY 

BY  MANIPULATION  OF  REFLUX  FLOW 

ID  =  0170 

FEED  FLOW 

01 

62  1 B 

205C+04102  3340 

8400+07214 

0000 

0000 

0000 

7FFF 

02 

7FFF 

2990  7FFF  0000 

2990  7FFF 

0000 

2990 

106A 

3FFB 

03 

0080 

0000  0000  0000 

0000  0000 

ID  =  0171 

REFLUX  FLOW 

01 

6010 

205F+04101  3340 

8480+08364 

0000 

0000 

0000 

7FFF 

02 

7FFF 

2110  7FFF  0000 

2110 

ID  =  0172 

STEAM  FLOW 

01 

6010 

205F+Q41Q0  3340 

8480+05740 

+00303 

0000 

0000 

7FFF 

02 

7FFF 

2110  7 FFF  0000 

2110 

ID  =  0173 

TOP  PRODUCT 

FLOW 

01 

6010 

205F+041Q  3  3340 

8480+05382 

0000 

0000 

OOOU 

7FFF 

02 

7FFF 

2110  7FFF  0000 

2110 

ID  =  0174 

BOTTOM  PRODUCT  FLOW 

01 

6010 

205F+Q4104  3340 

8480+05032 

0000 

0000 

0000 

7FFF 

02 

7FFF 

2110  7FFF  0000 

2110 

ID  =  0176 

TOP  PRODUCT 

COMPOS 

I  T  I  ON 

01 

641E 

404C+04 1 0  5  0000 

9100-01310+09879 

0000 

0000 

7FFF 

02 

■  7FFF 

2990  7FFF  0000 

2910  7FFF 

0000 

2990 

126A 

0000 

03 

ooco 

0000  0000  0000 

0000  0000 

ID  =  0176 

TEMPERATURE 

OF-  TRAY  8 

01 

72  1 E 

10BC+0Q 138  3000 

A20Q+20000 

0000 

0000 

0000 

7FFF 

02 

7FFF 

2990  7FFF  0000 

2990  7FFF 

0000 

2990 

1 1 6  A 

0000 

03 

0080 

0000  0000  0000 

0020  7000 

0000 

0000 

0000 

ID  =  0177 

BOTTOM  COMPOSITION 

( DUMMY ) 

01 

4010 

204F+2000G  0000 

9180+20000+00000 

0  00  0 

0000 

7FFF 

02 

7FFF 

2110  7FFF  0000 

2110 

-  UT/  Q  CIwOIJ  3HT  30  JOS’.  CO  .A 


QUO  * 

at 
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soi^ooeos 
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999T 

SO 

cooo 

Cl 

♦><S£80+l  3A8 

ons 

so 

I DUC-  9  90 T  CTXO  *  Q! 

o*ee  eoi^+ieos  oiod 

oils 


Oils  919T 


a: 


trio  »  oi 
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DATA 

ACQUISITION 

LOOP  RECORDS 

• (CONT 

'D> 

01 

0010 

ID 

=  0178 

BOTTOM  COMPOSITION 

207F 

0177  0000 

9180+20000+00000 

0000 

0000 

7FFF 

02 

7FFF 

2110 

7FFF  0000 

2110 

01 

4010 

ID 

=  0179 

FEED  COMPOSITION  (DUMMY) 

204F+2Q000  0000 

9180+20000  0000 

0  000 

0000 

7FFF 

02 

7FFF 

2110+10000  0000 

2110 

01 

0010 

ID  =  0180 

207F  0179  0000 

FEED  COMPOSITION 

9180+20000  0000  0000  0000  7FFF 

02 

7FFF 

2110+10000  0000 

2110 

B#  CONTROL  OF  THE  LIQUID  TEMPERATURE  ON  AN  INTERMEDIATE 
TRAY  BY  MANIPULATION  OF  STEAM  FLOW 


ALL  THE  DDC  LOOPS  REMAIN  THE  SAME  AS  WITH  REFLUX  CONTROL  EXCEPT 
THE  2  FOLLOWING  LOOP  RECORDS 


ID 

=  0175 

TOP  PRODUCT 

COMPOSITION 

01 

64 1 E 

404C  +  041 0  5 

0000 

9100- 

01310+09879 

0000 

0000 

7FFF 

02 

7FFF 

2990 

7FFF 

0000 

2990 

7FFF 

0000 

2990 

1 1 6  A 

23D4 

03 

OQCQ 

0000 

0000 

0000 

00  IB 

OCQG 

0000 

0000 

0400 

01 

■  72  1 E 

ID  =  0176 
10BC+0G131 

3000 

TEMPERATURE 

A200+2000Q 

CF  TRAY 

0000 

1 

0000 

0000 

7FFF 

02 

7FFF 

2990 

7FFF 

0000 

2990 

7FFF 

0000 

2990 

1  26A 

2663 

03 

ooco 

0000 

0000 

0000 

08  01 

0301 

0000 

0000 

0000 

N.  B.  CONTROL  OF  THE  LIQUID  TEMPERATURE  OF  ANY  INTER¬ 
MEDIATE  TRAY  CAN  BE  PERFORMED  BY  MODIFYING  THE  MULTIPLEX 
ADDRESS  IN  THE  TEMPERATURE  LOOP  RECORD 
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02 
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01 
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DATA  ACQUISITION  LOOPS  FOR  INTERMEDIATE  TRAY  TEMPERATURES 


ID  =  0181  TEMPERATURE  OF  TRAY  1 


7010 

7FFF 

2 1 BF+00 131  0000 

2110  7FFF  0000 

A280+20000 

2110 

0000 

0000 

0000 

7FFF 

7010 

7FFF 

ID  =  0182 

2 1BF+00  132  0000 

2110  7FFF  0000 

TEMPERATURE 
A2  80  +  20000 

2110 

OF  TRAY 
0000 

2 

0000 

0000 

7FFF 

7010 

7FFF 

ID  =  0183 

2 1 BF+00 133  0000 

2110  7FFF  0000 

TEMPERATURE 

A280+20000 

2110 

OF  TRAY 
0000 

3 

0000 

0000 

7FFF 

7010 

7FFF. 

ID  =  0184 

2 1BF+00 1 34  0000 

2110  7FFF  0000 

TEMPERATURE 

A280+20000 

2110 

OF  TRAY 

0000 

4 

0000 

0000 

7FFF 

7010 

7FFF 

ID  =  0185 
21BF+Q0135  0000 

2110  7FFF  0000 

TEMPERATURE 

A280+20000 

2110 

OF  TRAY 
0000 

5 

0000 

0000 

7FFF 

7010 

7FFF 

ID  =  0186 

2 1 BF+00 136  0000 

2110  7FFF  0000 

TEMPERATURE 

A280+20000 

2110 

OF  TRAY 

0000 

6 

0000 

0000 

7FFF 

7010 

7FFF 

ID  =  0187 

2 1 BF+00 1 3  7  0000 

2110  7FFF  0000 

temperature 

A280+20000 

2110 

OF  TRAY 
0000 

7 

0000 

0000 

7FFF 

7010 

7FFF 

ID  =  0188 

2 1 BF  +  00 1 3  8  0000 

2110  7FFF  0000 

TEMPERATURE 
A2  80  +  20000 
2110 

OF  TRAY 

0000 

8 

0000 

0000 

7FFF 
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RING  BUFFERS  FOR  CONTROL  STUDY 


ID 

=  0210 

FEED  FLOW 

01 

060E 

5408 

0170  0000 

0000  0200 

ID 

=  0211 

REFLUX  FLOW 

01 

060E 

5408 

0171  0000 

0000  0200 

ID 

=  0212 

STEAM  FLOW 

01 

060E 

5408 

0172  0000 

0000  0200 

ID 

=  0213 

TOP  PRODUCT 

FLOW 

01 

060E 

5408 

0173  0000 

0000  0200 

ID 

=  0214 

BOTTOM  PRODUCT 

FLOW 

01 

060E 

5408 

0174  0000 

0000  0200 

ID 

=  0215 

TOP  PRODUCT 

COMPOSITION 

01 

060E 

5408 

0175  0000 

0000  0200 

ID 

=  0216 

BOTTOM  COMPOSITION 

01 

060E 

5408 

0178  0000 

0000  0200 

ID 

=  0217 

FEED  COMPOSITION 

01 

060E 

5408 

0180  0000 

0000  0200 

ID 

=  0221 

TEMPERATURE 

OF 

TRAY  1 

01 

060E 

5408 

0181  0000 

0000  0200 

ID 

=  0222 

TEMPERATURE 

OF 

TRAY  2 

01 

060E 

5408 

0182  0000 

0000  0200 

ID 

=  0223 

TEMPERATURE 

OF 

TRAY  3 

01 

060E 

5408 

0133  0000 

0000  0200 
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RING  BUFFERS  FOR  CONTROL  STUDY 


... (CONT'D) 


ID 

=  0224 

TEMPERATURE 

OF 

TRAY 

4 

01 

060E 

5403 

0184  0000 

0000 

0200 

ID 

=  0225 

TEMPERATURE 

OF 

TRAY 

5 

01 

060E 

5408 

0185  0000 

0000 

0200 

ID 

=  0226 

TEMPERATURE 

OF 

TRAY 

6 

01 

060E 

5408 

0186  0000 

0000 

0200 

ID 

=  0227 

TEMPERATURE 

OF 

TRAY 

7 

01 

060E 

5408 

0187  0000 

0000 

0200 

ID 

=  0228 

TEMPERATURE 

OF 

TRAY 

8 

01 

060E 

5408 

0188  0000 

0000 

0200 
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mainline  dass 

MAINLINE  DASS 
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PURPOSE 

START  DATA  ACQUISITION  FOR  STEADY-STATE  DATA  AND 
PERFORM  MATERIAL  AND  ENERGY  BALANCES  CALCULATIONS 

DESCRIPTION  OF  PARAMETERS 

MAX  NUMBER  OF  SAMPLED  DATA  POINTS 

TIME  SAMPLE  TIME  (SEC.) 

RUN  RUN  NUMBER 

DATE  DATE  OF  THE  EXPERIMENT 

BTCMP  BOTTOM  PRODUCT  COMPOSITION 

FDCMP  FEED  COMPOSITION 

FDPLT  FEED  TRAY 

USAGE 

QUEUE  FROM  TELETYPE  8  AND  ENTER  DATA  AS  REQUIRED 
EXAMPLE 

ENTER— MAX*  TIME*  RUN(2A4)»  DATE  (  2A4  ) 

$10  10  FB-R 1805*  JAN  01 

ENTER  BOTTOM  COMPOS  I T I  ON  * FEFD  COMPOSITION  AND  FEED 
$0.6  47.0  4 
DATAC  QUEUED 

REMARKS 

DASS  IS  A  PROCESS  PROGRAM  OPERATED  IN  VCORE  UNDER 
MPX 

SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
DATAC 


INTEGER  FDPLT 
EXTERNAL  DATAC 

DIMENSION  RUN ( 2 ) >  DATE (2)*  TITLE (10*3) 
DIMENSION  ZERO (32) 

DATA  ZERO/32 *0.  / 

DEFINE  FILE  10 ( 60  *  80 >U » NEXT ) 

KOUNT=0 


• .  I 
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MAINLINE  DASS  •••(CONT'D) 


LUR  =  8 
LUW  =  LUR 
WRITE  ( LUW  *  5 ) 

5  FORMAT  (  T5  *  'ENTER  OPT  I ON-1  =  GO *  2=STOP') 

6  CALL  FFINP(LUR*1 *10*IOPT» IER) 

IF  (IER)  6*7*6 

7  GO  TO  ( 9  *90  )  »  I  OPT 
9  WRITE  (LUW *10) 

10  FORMAT  ( T 5 ♦  'ENTER — MAX*  TIME*  RUN(2A4)>  DATE ( 2A4 )  '  ) 

15  CALL  FF I NP ( LUR  *  4  *  10  *MAX  *  10  » I  POL  *  23  *  RUN  » 23  » DATE  * IER) 

IF  (IER)  20*40,30 
20  WRITE  ( LUW  *  25 ) 

25  FORMAT  (T5*  'CALL  TO  FF I NP  IN  ERROR — CRASH') 

CALL  EXIT 
30  WRITE  ( LUW  *35) 

35  FORMAT  (T5,  'INPUT  TO  FFINP  IN  ERROR-TRY  AGAIN') 

GO  TO  15 

40  CONTINUE 
WRITE (LUW*41 ) 

41  FORMAT  ( T5  *  'ENTER  BOTTOM  COMPOS  I T I  ON * FEED  COMPOSITION 

*  AND  FEED  ' ) 

42  CALL  FFINP(LUR*3*1»BTCMP*1»FDCMP,0*FDPLT»IER) 

I F ( I ER ) 20  *43  *42 

43  READ  (lO'l)  NLOOP 

WRITE  (10*1)  NLOOP, KOUNT* MAX* I  POL ♦ BTCMP * FDCMP , FDPLT 
READ  ( 10 ' 4 )  (  ( T I TLE ( I »  J )  ♦  U=l*3)»  1  =  1*10) 

WRITE  (10*4)  (  ( T I TLE ( I  *  J )  *  J= 1  *  3 ) *  1=  1*10)*  ( RUN ( I ) * 

*  1  =  1*2)  * 

1  (DATE ( I ) *  1=1*2) 

WRITEdO'8)  (ZEROt  I  )  ,1  =  1*32) 

WRITE ( 10 '9 )  ( ZERO ( I ) *  1  =  1 *32 ) 

IT  =  9 

CALL  OLEVL(DATAC»l *0*0  * IEQ) 

GO  TO  (170*172*174) *IEQ 
170  CONTINUE 

WRITE  ( LUW  *  70 ) 

70  FORMAT  (T5*  'DATAC  QUEUED') 

CALL  EXIT 
172  CONTINUE 

WRITE  ( LUW  *  72 ) 

72  FORMAT  (T5*  'QUEUE  TABLE  IS  FULL') 

CALL  EXIT 
174  CONTINUE 

WRITE  (LUW, 74) 

74  FORMAT  (T5*  'PROGRAM  WAS  QUEUED') 

CALL  EXIT 
90  IT  =  9 

CALL  CANCL ( IT) 

CALL  EXIT 
END 
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SUBPROGRAM  DATAC 
SUBPROGRAM  DATAC 


C 

C 

C  SUBPROGRAM  DATAC 

C  - 

C 

C 

C  PURPOSE 

C  DATA  ACQUISITION  FOR  MATERIAL  AND  ENERGY  BALANCES 

C  CALCULATIONS 

C 

C  USAGE 

C  THIS  SUBPROGRAM  IS  QUEUED  BY  DASS  AT  EVERY  SAMPLED 

C  INTERVAL  FOR  MATERIAL  AND  ENERGY  BALANCES 

C  CALCULATIONS 

C 

C  REMARKS 

C  USE  OF  THIS  SUBPROGRAM  WOULD  SUSPEND  EXECUTION  OF 

C  OTHER  PROGRAMS  IN  VCORE  FOR  A  PERIOD  WHICH  WAS  SPE 

C  CIFIED  BY  THE  USER  IN  THE  PROCESS  PROGRAM  DASS 

C 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  DASS*  BALNC 

C 
C 

EXTERNAL  BALNC 
EXTERNAL  DATAC 

DIMENSION  A (32)  *B(32)  *  TOT (32)  >SUMSQ(32)  » I  CODE (32) 
DEFINE  FILE  10 ( 60 > 80 »U » I NXT ) 

C  MULTIPLEXOR  NUMBER  AND  CALCULATION  CODE 

DATA  I  CODE/ 14 10 2  *  14 10 1*14100* 14 104 *14103  *14105*24106 
**24109  *24107  » 

124108 *24110 *30130 *30131 *30132 *30133 *30134 *30135 *30136 
**30137*30138* 

230139 *30140 *30141 *30142 *30143 *30144*30145 *30146 *30147 

*  *30148  » 

330149  *30150/ 

C  SPAN/32767 

DATA  A/l»1008E-04*l«2762E-04**8758E~04*.7678E-04 

*  » • 8212E-04* 

121  •0333E”04*-2*0100E“04*  •6103E-03*3*6622E-04»3*6622E 
*-0  4  $ 

23.6622E-04*21*0./ 


. 


'  >  •'  -<  •'  )  .!  i  •  •  • 
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SUBPROGRAM  DATAC 


• • • ( CONT ’ 0 ) 


C  INTERCEPT 

DATA  B/2#0. *0.3 * 3*0. » 98.79 , -10. >3*3. » 21*0 */ 

READ  (10*1)  NLOCP  *  KOUNT,  MAX  ,  IPOL 
READ ( 10 ’ 8 )  ( TOT ( I )  j  I  =  1 »  32 ) 

READ ( 10*9) ( SUMSQ ( I ) *1=1 >32 ) 

DO  999  KOUNT  =  1»MAX 

C  CALCULATE  COLD  JUNCTION  COMPENSATION 

CALL  COLD J ( I RBT ) 

DO  140  1=1*32 

C  GET  CALCULATION  TYPE 

I T YPE= I  CODE ( I ) /10000 

C  CALCULATE  MPX  ADDRESS 

MPXAD= I  CODE ( I ) -10000* I  TYPE 

C  READ  MULTIPLEXOR 

CALL  AIP ( 11000  *  INPUT  *MPXAD ) 

20  CALL  A I P ( 0  *  JTEST ) 

GO  TO ( 20  *  40 )  »  JTEST 
40  DA TA= INPUT 

GO  TO (60  *80  *  100 )  >ITYPE 

C  FLOW  CALCULATION 

60  CALL  ZERCK ( DATA ) 

C  TAKE  SQUARE  ROOT  AND  RESCALE  INPUT 

DATA=SGRT ( DATA ) *181 *0166 
GO  TO  110 

C  ZERO  CHECK  ONLY 

80  CALL  ZERCK ( DATA ) 

GO  TO  110 

C  TEMPERATURE  CALCULATION 

100  CALL  TC0NV( DATA » INPUT  * IRBT ) 

GO  TO  120 

110  DATA=A ( I ) #DATA+B ( I ) 

120  T0T( I )  =  TOT ( I ) +DATA 
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SUBPROGRAM  DATAC  ...(CQNT'D) 


SUMSG ( I ) =  SUMSG (  I ) +DATA*DATA 
140  CONTIiNUE 

WRITE  (  1 0  '  1  )  NLOOP  »  KOUNT »  MAX 
WRITEdO‘8)  ( TOT  (  I  )  *1  =  1*32) 

WRITE ( 10 • 9  )  (SUMSQ (  I  )  » 1  =  1 »32 ) 

C  CHECK  IF  ENOUGH  POINTS  ACCUMULATED 


T I ME= I POL 
I  NT  =  T  IME/0 
CALL  SUSPN 
999  CONTINUE 
CALL  QLEVL 
CALL  DEQUE 
CALL  CAN CL 
CALL  EXIT 
END 


.1 

(9*  I  NT) 

(BALNC*1»Q»Q*IER) 
( DATAC  » 1 »  0 ) 

(9  ) 
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SUBPROGRAM  BALiMC 
SUBPROGRAM  BALNC 


C 

C 

c  SUBPROGRAM  BALNC 

C  - 

C 

C 

C  PURPOSE 

C  PERFORM  MATERIAL  AND  ENERGY  BALANCES  CALCULATIONS 

C  WHEN  DATA  ACCUMULATION  HAS  BEEN  COMPLETED 

C 

C  USAGE 

C  THIS  PROGRAM  IS  QUEUED  BY  DATAC  TO  OBTAIN  NECESSARY 

C  DATA 

C 

C  REMARKS 

C  THIS  IS  A  PROCESS  PROGRAM  OPERATED  IN  VCORE  UNDER 

C  MPX 

C 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  COLDJ  *  T  CONV  *  ZERCK*  INFF 

C 
C 

INTEGER  FDPLT 
DIMENSION  RUN ( 2 ) >  DATE ( 2 ) 

DIMENSION  AV(34) *  VAR ( 34 ) »TITLE(34*3) >  UNIT(34*2) 

DEFINE  FILE  10 ( 60  *  80 *U *NEXT ) 

C  DEFINE  FUNCTION  STATEMENTS 

TEMP ( T ) =5 • * ( T-32 • ) /9. 

CPWG ( T )=7.880+0.32E-02*T-483.3E-05*T**2 
CPWL ( T )  =  1 #0009-0. 1362 E-03#T+0 *2026E-05*T**2 
CPMG ( T )=10.26+1*984E-02*T-0«144E-05*T**2-1#92E-09*T**3 
CPML ( T ) =0.5  573  +  0. 18  70 E~0 2 *T+0* 9011 E“05*T**2 
HEATW ( T ) =108 0.2 -0.3 785 *T-0. 5618 E-03*T*#2 
HEATM ( T ) = (29 1.2-0. 3308*T-0.1 526E-02*T**2 ) *1.8 
DENS( T*X )*1« 0201-0* 5123E-03*T-0« 15 l2E-05*T**2-0« 15 19E 
*-02^100  «*X 

1  -0.8106E-05^(100.*X)**2 

DENSW(T ) =1.00 50-0* 2142 E-03*T-0« 2508 E-05*T**2 

READ  DATA 


READ  (10*1)  NLOOP»KOUNTtMAX» I  POL  * BTCMP * FDCMP * FDPLT 
READ  (10*2)  (  ( T I TLE ( I »  J )  ♦  J  =  l»3)»  1  =  1*12) 

READ  (10*3)  ( ( T I TLE ( I  *  J ) »  J=l*3)*  1  =  13*24) 
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SUBPROGRAM  BALMC  •••(CONT’D) 

READ  (10«4)  (  (  T  I  TLE  (  I  »  j  )  »  J  =  1  »  3  )  *  1=25,34),  (RUN(I), 
*  1—1*2) * 

1  I  DATE ( I ) *  1  =  1,2) 

READ  (10'5)  (  ( UN  I T ( I » J ) »  j=l,2),  1  =  1,18) 

READ  (10*6)  ( ( UN  I T ( I , J )  ,  J=l,2)»  1  =  19,34) 

READ ( 10 ' 8 )  ( A V ( I  )  ,1  =  1,32) 

READ ( 10*9)  (VAR ( I  )  ,  1  =  1 ,32 ) 

COMPUTE  AVERAGE  AND  VARIANCE  OF  READINGS 


DO  1  1=1,32 

VAR ( I ) = ( VAR ( I ) -AV ( I ) *AV ( I ) /KOUNT ) / ( KOUNT-1 ) 
VAR ( I ) =SQRT ( VAR (  I  )  ) 

AV( I ) =AV ( I ) /KOUNT 


INSERT  FEED  AND  BOTTOM  COMPOSITIONS  IN  VECTOR 


DO  2  1=1,32 
K  =  3  5- I 

I  F  (  K- 10  )  4 , 3 , 3 
A  V  (  K  )  =  A  V  {  K“2  ) 

VAR ( K ) = VAR ( K-2 ) 

CONTINUE 
VAR ( 8 ) =0 • 

VAR ( 9 ) =0 • 

AV ( 8 ) =B  TCMP 
AV ( 9 )  =  FDCMP 

CORRECT  FLOW'  SIGNALS  FOR  TEMPERATURE 


F  =  AV ( 1)*SQRT(DENS(TEMP(AV(27)  )  ,  AV ( 9 ) / 1 00  .  )  ) 

R  =  AV(2)#SQRT(DENS(TEMP(AV(26)  ) *AV ( 7 ) /1Q0  .  )  ) 

B  =  AV(4)*SQRT(DENS(TEMP(AV(28)  ),  AV(8)/100*  )  ) 
D=AV( 5 ) #SQRT ( DENS ( TEMP (AV (26) ),AV(7)/100.)) 
W=AV(6)*SQRT(DENSW(TEMP(AV(33) ) ) ) 

OVERALL  MATERIAL  BALANCE 


F  I  N  =  F 
FOUT  =  D  +  B 

ERRT= (FOUT/FIN-1. )*100. 
C  COMPONENT  BALANCE 


C I N 1  =  F*A V ( 9 ) /100. 
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SUBPROGRAM  BALNC  •••(CONT'D) 

C I N2=F# ( 1 • -AV ( 9 ) /100. ) 

CT laD*AV ( 7  )  /100. 

CT2=D*( 1 • -AV ( 7 ) /10Q. ) 

CB1=B*AV ( 8  )  / 100 • 

CB2=B*( l.-AV(8 ) /100. ) 

COUT 1  =  CT 1  +  CB1 
C0UT2  =  C  T2  +  CB2 
ERR Is (CQUTI/CINI-I* )#10G. 

ERR2= (COUT2/CIN2-1. )#100. 

OVERALL  ENERGY  BALANCE 

ENTHALPY  BASED  ON  ZERO  DEG  F 

FEED  ENTHALPY  IN 

HFI 1=CPML (TEMP (AV ( 30) ) ) *AV ( 9 ) /100 . *F*AV ( 30 ) 
HFI2=CPWL(TEMP(AV(30) ) )*( 1 • — AV ( 9 ) /1Q0* )*F*AV(3C) 

HF I =HF 1 1 +HF I  2 

C  STEAM  ENTHALPY  IN 

HSI=(HEATW(AV(24) ) +CPWL ( T EMP ( AV ( 24 ) ) )*AV(24) ) * AV ( 3 ) 

C  REFLUX  ENTHALPY  IN 

HRI1=CPML(TEMP(AV(31) ) )*R*AV(7)/1C0«*AV(31) 
HRI2=CPWL(TEMP(AV(31) ) ) *R* ( 1 . “AV ( 7 ) / 100 . )#AV(31) 

HR  I -HR  1 1  +  HR 1 2 

C  COOLING  WATER  ENTHALPY  IN 

HWI=CPWL ( TEMP ( AV ( 3  3  )  )  )*W*AV(33) 

C  TOTAL  ENTHALPY  IN 

H I T  =  H  F I +H  S I +HR I +  H  W I 

C  BOTTOM  ENTHALPY  OUT 

HB01=CPML ( TEMP ( AV ( 14 ) ) ) *B*AV ( 8 ) / 1 00 • *AV ( 14) 
HB02=CPWL ( TEMP ( AV ( 14) ) ) *B* ( 1 . -AV ( 8 ) / 100 . )*AV(14) 
HB0=HB01+HB02 

C  TOP  PRODUCT  ENTHALPY  OUT 

HT01=CPML ( TEMP ( AV(23) ) ) *D^AV ( 7 ) / 100 t *AV ( 2 3 ) 

HT02  =  CPWL ( TEMP ( AV ( 23 )  )  5  *D* ( l.-AV ( 7 ) / 1 00 • ) *AV ( 23 ) 
HT0=HT01+HT02 
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SUBPROGRAM  BALNC  •••(CONT'D) 

C  REFLUX  ENTHALPY  OUT 

HR01=CPML ( TEMP ( AV ( 23 ) ) ) *R*AV { 7 ) / 100 • #AV ( 23 ) 
HR02=CPWL ( TEMP ( AV ( 23 ) ) ) *R* ( 1 .-AV ( 7 ) /100. ) *AV ( 23 ) 
HR0=HR01+HR02 

C  STEAM  CONDENSATE  ENTHALPY  OUT 

HSO=CPWL ( TEMP ( AV ( 25 ) ) ) *A V ( 3 ) *AV ( 2 5 ) 

C  COOLING  WATER  ENTHALPY  OUT 

HWQ  =  C  PWL ( TEMP (AV( 34) )  )*W*AV(34) 

C  TOTAL  ENTHALPY  OUT 

HOT  3HBO+HTO+HRO+HSO+HWO 
C  DIFFERENCE  IS  HEAT  LOSS 

HLOSS=H I T-HOT 

DOCUMENT  STEADY  STATE *  MATERIAL  AND  ENERGY  BALANCES 
STEADY  STATE 


WRITE  (6*5) 

5  FORMAT  ( ‘ 1 ' ♦//////) 

WRITE  (6*6)  ( RUN ( I  )  *  1  =  1*2)*  ( DATE ( I >  *  1  =  1*2) 

6  FORMAT  (  T5  1  *  ‘STEADY  STATE  DATA ' /T 52  *  ‘RUN  NO  '*  2A4 
*/T55*  2 A4 // ) 

WRITE  (6  *900)  ( T I TLE ( 1 »  J )  *  J=l*3)»  F*  ( UN  I T ( 1  *  J )  •  J-l 

*  »  2  )  * 

1  (TITLE(4*J)  >  J= 1  * 3 )  *  B*  (UNIT(4»j)*  J  =  1 

*  *2  ) 

900  FORMAT  (T32*  3A4*  T47*  F6.3*  2A4*  T62*  3A4*  T77*  F6«3» 

*  2A4) 

WRITE  (6*900)  ( T I TLE ( 2 , J ) *  J=l*3)*  R»  (UNIT(2*J)*  J=1 

*  ♦  2  )  * 

1  ( T I TLE ( 5  *  J )  *  J= 1  *  3 )  ♦  D  »  ( UN  I T  <  5  *  J )  •  J  =  1 

*  *2  ) 

WRITE  (6  *900)  ( T I TLE ( 3  *  J )  »  J=l*3)*  AV(3)»  (UNIT(3*J)* 

*  J  =  1  *  2 ) * 

1  (TITLE(6*J)  *  J= 1  *  3 ) *  W*  ( UN  I T ( 6  *  J )  *  J  =  1 

*  *  2  ) 

WRITE  (6*901)  FDPLT  *  (TITLE(9»J)*  J=l*3)»  FDCMP  * 

*  ( UNI T ( 9  * J ) * J  =  1 *2 ) 

901  FORMAT  (T32*  ‘FEED  DLATE ’ »  T47,  13*  T62*  3A4*  T77* 

*  F6.2*  2A4) 
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SUBPROGRAM  BALNC 

WRITE  (6*902)  (TITLE(7*J)* 

*  J  =  1 »  2 ) » 

1  ( T  I  TLE ( 8  *  J ) » 

*  J  =  1  *  2 ) 

902  FORMAT  (T32*  3A4*  T47*  F6.2 

*  2A4) 

WRITE  (6  *903)  ( T  I  TLE ( 30 ♦ J )  * 

*>J>*  J= 1  *  2  ) ♦ 

1  ( T  I  TLE ( 3 1  *  j ) * 

**J)  »  J«l*2) 

903  FORMAT  ( T 32  *  3A4*  T47*  F6.1 

*  2A4) 

WRITE  (6  *903)  ( T  I  TLE ( 24  * J )  * 

*  » J  )  *  J= 1  * 2 ) * 

1  (TITLE(10*J) * 

**J) »  J=  1  *  2  ) 

WRITE  (6*60) 

MATERIAL  BALANCE 


•• (CONT'D) 


J=  1 » 3  )  ♦  AV ( 7  )  »  ( UN  I T ( 7  *  J )  * 

J=1  *3  )  *  AV ( 8  )  #  (UNIT ( 8  »J) * 


»  2A4  *  T62.  *  3A4*  T77*  F6.2* 


J  =  1 ♦ 3 )  *  AV ( 30  )  »  ( UN  I T ( 30 
J= 1 »  3  )  *  AV ( 3  1  )  »  ( UN  I T ( 31 


*  2A4*  T62  *  3A4*  T77*  F6.1* 


J  =  1  *  3 )  *  AV ( 24  )  *  ( UN  I T ( 24 


J  =  1 *3 )  »  AV ( 10  )  *  (UNIT ( 10 


WRITE  (6*10) 

10  FORMAT  ( T44  *  'MATERIAL  BALANC  E'//T56» 

*  ' FLOW'  *  T66  * 

1  'COMP'*  T73*  'METHANOL'*  T84*  ' WATER '• /T54 *  '(LB 
#/M  I  N )  '  *  T64* 

2  '  (WT  P CT )  ' *  T7 3  »  '  ( LB/MI N ) ' *  T83*  •  ( LB/MIN ) •  ) 

WRITE  (6*20)  F*  AV(9)»  CIN1*  CIN2 

20  FORMAT  (/T32*  'FEED'*  T54,  F6.3*  T64*  F6.3*  T73*  F6.3* 

*  T  83  »  F6.3) 

WRITE  (6*30)  B*  AV ( 8 ) *  CB1*  CB2 
30  FORMAT  (T32*  'BOTTOM  PRODUCT'*  T54*  F6.3*  T64*  F6.3* 

*  T 73 ,  F6.3* 

1  T8  3  *  F6.3) 

WRITE  (6*40)  D »  AV ( 7 ) *  CTl*  CT2 
40  FORMAT  (T32*  'TOP  PRODUCT'*  T54*  F6.3*  T64*  F6.3*  T73 * 

*  F6.3  *  T83  » 

1  F6.3) 

WRITE  (6*50)  ERRT  *  ERR1*  ERR2 
50  FORMAT  (T32*  'CLOSURE  ERROR-PC'*  T53*  F5.1*  T72*  F5.1* 

*  T 82  *  F5  •  1  ) 

WRITE  (6*60) 

60  FORMAT  (////) 

ENERGY  3ALANCE 


WRITE  (6*70) 

70  FORMAT  (T47*  'ENERGY  BALANC  E'//T57, 
*  'ENTHALPY  IN'* 
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SUBPROGRAM  BALNC  ...(CONT'D) 

1  T74*  ‘ENTHALPY  OUT'/T58*  • ( BTU/M I N )  1  *  T75*  '  ( B TU 

*  /  M  1 1\  )  ‘  ) 

WRITE  (6*80)  HW I  *  HWO 

80  FORMAT  (/T39*  'COOLING  WATER'*  T58,  F7.1*  T76.  F7.1) 
WRITE  (6*90)  HR  I*  HRO 

90  FORMAT  (T39*  'REFLUX'*  T58.  F7.1*  T76*  F7.1) 

WRITE  (6*100)  HTO 

100  FORMAT  ( T39  *  'TOP  PRODUCT'  ♦  T76*  F7.15 
WRITE  (6.110)  HFI 

110  FORMAT  (T39*  'FEED'.  T58.  F7 • 1 ) 

WRITE  (6*120)  HSI*  HSO 

120  FORMAT  (T39*  'STEAM'*  T58*  F7.1*  T76*  F7.1) 

WRITE  (6.130)  HBO 

130  FORMAT  (T39*  'BOTTOM  PRODUCT'.  T76*  F7.1) 

WRITE  (6*140)  HIT*  HOT 

140  FORMAT  (T39*  'TOTAL'*  T58*  F7.1*  T76.  F7.1) 

WRITE  (6*150)  HLOSS 

150  FORMAT  (T39*  'HEAT  LOSS'*  T76.  F7.1) 

DOCUMENT  ALL  STEADY  STATE  CONDITIONS 


WRITE  (6*200) 

200  FORMAT  ( ' 1' *  //////) 

WRITE  (6*210)  KOUNT*  ( RUN ( I ) *  1=1*2)*  ( DATE ( I ) *  1=1*2) 
210  FORMAT  (T33*  'STEADY  STATE  CONDITIONS  BASED  ON'.  14.  • 

*  POINTS'/ 

1  T42*  'RUN  NO  '*  2A4.  IX*  2A4/) 

DO  230  1=1.13 

WRITE  (6  *220)  ( T I TLE ( I  * J )  *  J= 1  *  3 ) * AV ( I  )  . ( UN  I T ( I ♦ j ) * 

*  J  =  1  *  2 ) *  VAR ( I ) 

220  FORMAT  (T33*  3A4*  '='*  F7.3*  IX*  2A4*  3X*  'DEV='* 

*  F7 • 4 ) 

230  CONTINUE 

DO  250  1=14*34 

WRITE  (6  *240)  (TITLE(I.J)*  j  =  1  *  3 )  * AV ( I )  * ( UNI T ( I  * J )  * 

*  J  =  1  *  2 ) *  VAR ( I ) 

240  FORMAT  ( T  3  3  ♦  3A4 »  '  =  '*  F7.1*  IX*  2A4*  3X*  'DEV='* 

*  F7.4) 

250  CONTINUE 

WRITE  (6.260) 

260  FORMAT  ( ' 1 ' ) 

CALL  EXIT 
END 
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SUBROUTINE  COLDJ 
SUBROUTINE  COLDJl IRBT) 


C 

C 

C  SUBROUTINE  COLDJ 

C  - 

C 

C 

C  PURPOSE 

C  CALCULATE  COLD  JUNCTION  COMPENSATION  FOR  TEMPERA 

C  TURE 

C 

C  DESCRIPTION  OF  PARAMETERS 

C  IRBT  COLD  JUNCTION  COMPENSATION 

C 

C  USAGE 

C  CALL  COLDJ IRBT) 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  NONE 

C 

c 

DIMENSION  M P X A D ( 2 ) *  I N  P  U  T (2) 

DATA  C*D/94. 429 *-3082*0428/ 

DATA  MPXAD/129*128/ 

C  129  =  BRIDGE  UNBALANCE*  128  *  REF  VOLTAGE 

DO  40  1=1*2 

CALL  A  IP ( 11000* I NPUT ( I  ) *MPXAD ( I )  ) 

20  CALL  A  I P ( 0  * JTEST ) 

GO  TO (20  *40 ) * JTEST 
40  CONTINUE 

TRBT=51.676*FLOAT ( INPUT ( 1 ) ) /FLOAT ( INPUT (2)1+41.0 

irbt=c*trbt+d 

RETURN 

END 
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SUBROUTINE  TCQNV 

SUBROUTINE  TCONV ( TEMP  »INPUT*IRBT) 


C 

C  *  SUBROUTINE  TCONV 

r 

—  —  —  —  —  —  —  —  —  — —  —  —  ^ 

C 

c 

C  PURPOSE 

C  CALCULATE  THE  TEMPERATURE  FROM  THE  MULTIPLEXOR 

C  READING  AND  THE  COLD  JUNCTION  COMPENSATION 

C 

C  DESCRIPTION  OF  PARAMETERS 

C  TEMP  COMPENSATED  TEMPERATURE  IN  DEG  F 

C  INPUT  MULTIPLEXOR  READIND  IN  BINARY  COUNTS 

C  IRBT  COLD  JUNCTION  COMPENSATION 

C 

C  USAGE 

C  CALL  TCONV (TEMP*INPUT *RBT) 

C 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  NONE 

C 
C 

INTEGER  COUNT ( 9 ) 

REAL  INTCP ( 9 ) 

DIMENSION  SLOPE ( 9 ) 

DATA  COUNT/ 1639  >3  998*63  5  7  *8749*11174.136  31  *1608  9  *  18546 
**21036/ 

DATA  SLOPE/# 01059  * .01059  * .01045  *  .01031  * . 01017*. 01017 

*  .  .01017  ♦ 

1 .01003  * .01003/ 

DATA  INTCP /32. 6389  *32.6389  *33. 5616  *34. 79 74 *36. 3332 

*  *36.3334 #36.3333 
1*38.8156*38.8159/ 

C  COLD  JUNCTION  COMPENSATION 

INPUT® INPUT+IRBT 

C  SEARCH  FOR  SEGMENT 

DO  20  1=1*9 

IF (COUNT ( I )-INPUT)20#20*40 
40  INDX= 1-1 
GO  TO  60 
20  CONTINUE 

6  0  TEMP  =  SLOPE ( I NDX ) *  I NPUT+I NTCP ( INDX) 

RETURN 

END 
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SUBROUTINE  ZERCK 
SUBROUTINE  ZERCK! INPUT) 


C 

C 

C  SUBROUTINE  ZERCK 

C  - 

C 

C 

C  PURPOSE 

C  ZERO  CHECK 

C 

C  DESCRIPTION  OF  PARAMETERS 

C  INPUT  MULTIPLEXOR  READING  IN  BINARY  COUNTS 

C 

C  USAGE 

C  CALL  ZERCK! INPUT) 

C 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  NONE 

C 

c 

REAL  INPUT 
INPUT=INPUT-6553*4 

C  ZERO  CHECK  INPUT 

IF!  INPUT ) 20*20*40 
20  I NPUT  =  0 • 

GO  TO  60 

C  RESCALE  INPUT 

40  INPUT=INPUT#1«25 
60  RETURN 
END 
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PROGRAM  INFF 
PROGRAM  INFF 


C 

C 

c  PROGRAM  INFF 

C  - 

C 

C 

C  PURPOSE 

C  READ  INTO  DISK  STORAGE  FILE  'PACC1'  THE  TITLES 

C  WHICH  WILL  BE  USED  FOR  PROGRAM  BALNC  OUTPUT 

C 

C  DESCRIPTION  OF  PARAMETERS 

C  TITLE  TITLES  FOR  SUBPROGRAM  OUTPUT 

C  UNIT  UNITS  OF  THE  CORRESPONDING  TITLES 

C 

C  USAGE 

C  STORE  THIS  NONPROCESS  PROGRAM  ONTO  DISK  -  THE 

C  FOLLOWING  DATA  ARE  REQUIRED  FOR  THIS  PROGRAM  INFF 


c 

FEED  FLOW 

LB/MIN 

c 

REFLUX  FLOW 

LB/M  I N 

c 

STEAM  FLOW 

LB/MIN 

c 

BOTTOM  PROD 

LB/MIN 

c 

TOP  PROD 

LB/MIN 

c 

COOL  WATER 

LB/MIN 

c 

TOP  PROD 

WT  P  C 

c 

BOTTOMS  COMP 

WT  P  C 

c 

FEED  COMP 

WT  P  C 

c 

PRESSURE 

IN  H20 

c 

COND  LEVEL 

PSIG 

c 

REB'R  LEVEL 

PSIG 

c 

DIFF  PRESS 

PSIG 

c 

REBOILER  TEM 

DEG  F 

c 

PLATE  1  TEMP 

DEG  F 

c 

PLATE  2  TEMP 

DEG  F 

c 

PLATE  3  TEMP 

DEG  F 

c 

PLATE  4  TEMP 

DEG  F 

c 

PLATE  5  TEMP 

DEG  F 

c 

PLATE  6  TEMP 

DEG  F 

c 

PLATE  7  TEMP 

DEG  F 

c 

PLATE  8  TEMP 

DEG  F 

c 

COND  TEMP 

DEG  F 

c 

STEAM  TEMP 

DEG  F 

c 

COND 1 T  TEMP 

DEG  F 

c 

REFLUX  FLOW 

DEG  F 

c 

FEED  FLOW 

DEG  F 

c 

BOTTOM  FLOW 

DEG  F 

c 

REB  0 ' HE AD 

DEG  F 

c 

FEED  INLET 

DEG  F 

c 

REFLUX  INLET 

DEG  F 

I 
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PROGRAM  INFF  ...(CONT'D) 

C  COL  O'HEAD  DEG  F 

C  WATER  INLET  DEG  F 

C  WATER  OUTLET  DEG  F 

C  (ALL  THESE  DATA  SHOULD  START  AT  COLUMN  1  ON  THE 

C  DATA  CARDS) 

C 

C  REMARKS 

C  DATA  FILE  10  OF  NAME  PAC01  IS  REQUIRED 

C 

C 


40 


DIMENSION  T  I  TLE ( 34  »  3 ) *  LPID(34)*  LPHX(34)*  UN  I T  C  3  4 ♦ 2 ) 
DATA  NLOOP/34/ 

DATA  LP ID/0120 *0121 >0122 *0123 »0124 *0123 *0126*0127 *0128 
**0129  *0130  * 

1  0131*0132*0135*0136*0137*0138*0139*0140*0141 
**0142  *0143  * 

2  0144*0145*0146*0147*0148*0149*0130*0151*0152 
**0153*0154* 

3  0155/ 

DEFINE  FILE  10 ( 60 » 80 *U *  NEXT ) 

DO  20  1=1*34 

READ  (5*10)  ( T I TLE ( I  * J ) *  J=l*3)*  (UNIT(I*J)*  J=l*2) 

WRITE  (6*15)  ( T I TLE ( I ♦ J ) *  J=l*3)>  (UNIT(I*J)»  J=l*2) 

10  FORMAT  (5A4) 

13  FORMAT  ( T5  *  5A4) 

20  CONTINUE 

DO  40  1=1*34 

LP I D ( I ) =  LP I D ( I ) +100 

CALL  CV I D ( LP I D ( I ) »LPHX( I ) ) 

CONTINUE 
KOUNT  =  0 


M  A  X  =  0 
A  =  0 

WRITE  (10'1) 
*  1  =  1*  NLOOP ) * 
1  ( LPHX ( I ) > 

WRITE  (10*2) 
WRITE  (10*3) 
WRITE  (10*4) 
WRITE  (10*5) 
WRITE  (10*6) 
CALL  EXIT 
END 


NLOOP*  KOUNT*  MAX*  A*  A*  KOUNT* 
1=1 »NLOOP ) 

( (TITLE( I *J)  »  J= 1  * 3 ) »  1  =  1*12) 

(  (TITLE  (  I  * J )  »  J  =  1  *  3 ) *  1  =  13*24) 
((TITLE  (I*J)*  J= 1 ♦ 3 ) »  1=25*34) 
(  ( UN  I T ( I >J)  *  J  =  1  *  2 )  *  1  =  1*18) 

(  ( UN  I T ( I  *  J )  »  J  =  1 *2)  »  1  =  19*34) 
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TABLE  D.2-1 

TYPICAL  OUTPUT  OF  PROCESS  PROGRAM  DASS 
(MATERIAL  AND  ENERGY  BALANCES  CALCULATIONS) 


STEADY  STATE  DATA 
RUN  NO  FB-I802 
OCT  03 


FEED  FLOW 
REFLUX  FLOW 
STEAM  FLOW 
FEED  PLATE 
TOP  PROD 
FEED  INLET 
STEAM  TEMP 


2.466  LB/M  IN 
1.990  LB/M  IN 
1.997  LB/M  IN 
4 

95.79  WT  P  C 

163.5  DFG  F 

233.1  DEG  F 


BOTTOM  PROD 
TOP  PROD 
COOL  WATER 
FEED  COMP 
BOTTOMS  COMP 
REFLUX  INLET 
PRESSURE 


1.252  LB/MI N 
1.236  LB /Ml N 
62.266  LB/MIN 
47.00  WT  P  C 
0.70  WT  P  C 

150.6  DEG  F 

1.1  IN  H20 


MATERIAL  BALANCE 


FEED 

BOTTOM  PRODUCT 
TOP  PRODUCT 
CLOSURE  ERROR-PC 


FLOW 

(LB/MIN) 

2.466 

1.252 

1.236 

0.9 


COMP 
(WT  PCT ) 

47.000 

0.700 

95.790 


METHANOL 

(LB/MIN) 

1.159 
0.008 
1 .184 
2.8 


' WATER 
(LB/MIN 

1.307 

1.244 

0.052 

-0.8 


ENERGY  BALANCE 


COOLING  WATER 

REFLUX 

TOP  PRODUCT 

FEED 

STEAM 

BOTTOM  PRODUCT 

TOTAL 

HEAT  LOSS 


ENTHALPY  IN 
(BTU/MIN ) 

3736.5 
219.3 

354.9 

2390.7 

6701.5 


ENTHALPY  OUT 
(BTU/MIN) 

5302.5 

206.6 

128.3 

464.1 

264.6 

6366.2 

335.2 
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TABLE  D.2-1 


. . . (CONT 'D) 


TYPICAL  OUTPUT  OF  PROCESS  PROGRAM  DASS 
(STEADY  STATE  OPERATING  CONDITIONS) 


STEADY  STATE  CONDITIONS  BASED  ON  10  POINTS 
RUN  NO  FB-I802  OCT  03 


FEED  FLOW 

2.580 

LB /MIN 

DEV=  0 

0049 

REFLUX  FLOW  = 

2.268 

LB/MIN 

DEV=  0 

0227 

STEAM  FLOW  = 

1.997 

LB/M  I N 

DEV=  0 

0059 

BOTTOM  PROD  = 

1.254 

LS/MIN 

DEV=  0 

0045 

TOP  PROD 

1.409 

LB/MIN 

DEV=  0 

0119 

COOL  WATER  = 

62.233 

LB/MIN 

DEV=  0 

4381 

TOP  PROD 

95.790 

WT  P 

C 

DEV=  0 

0373 

BOTTOMS  COMP= 

0.700 

WT  P 

C 

DEV=  0 

0000 

FEED  COMP 

47.000 

WT  P 

C 

DEV=  0 

0000 

PRESSURE 

1.123 

IN  H20 

DEV=  0 

0039 

COND  LEVEL  = 

5.004 

PSIG 

DEV=  0 

0158 

REB'R  LEVEL  = 

9.903 

PSIG 

DEV=  0 

0594 

DIFF  PRESS  = 

9.973 

PSIG 

DEV=  0 

1103 

REBOILER  TEM= 

209.9 

DEG 

F 

DEV=  0 

4625 

PLATE  1  TEMP= 

204.3 

DEG 

F 

DEV=  0 

2713 

PLATE  2  TEMP= 

195.0 

DEG 

F 

DEV=  0 

2886 

PLATE  3  TEMP= 

179.4 

DEG 

F 

DEV=  0 

1625 

PLATE  4  TEMP= 

171.6 

DEG 

F 

DEV=  0 

1326 

PLATE  5  TEMP  = 

162.8 

DEG 

F 

DEV=  0 

2297 

PLATE  6  TEMP= 

155.9 

DEG 

F 

DEV=  0 

1443 

PLATE  7  TEMP= 

151.4 

DEG 

F 

DEV=  0 

1420 

PLATE  8  TEMP= 

148.2 

DEG 

F 

DEV=  0 

0459 

COND  TEMP 

144.0 

DEG 

F 

DEV=  0 

1118 

STEAM  TEMP  = 

233.1 

DEG 

F 

DEV=  0 

2175 

COND  '  T  TEMP  = 

230.0 

DEG 

F 

DEV=  0 

0914 

REFLUX  FLOW  = 

125.3 

DEG 

F 

DEV=  0 

1344 

FEED  FLOW 

88.0 

DEG 

F 

DEV=  0 

1291 

BOTTOM  FLOW  = 

102.1 

DEG 

F 

DEV=  0 

1381 

REB  O'HEAD  = 

207.7 

DEG 

F 

DEV=  0 

1900 

FEED  INLET  = 

163.5 

DEG 

F 

DEV=  3 

1787 

REFLUX  I  NLET  = 

150.6 

DEG 

F 

DEV=  0 

2500 

COL  O'HEAD  = 

148.6 

DEG 

F 

DEV=  0 

1395 

WATER  INLET  = 

60.0 

DEG 

F 

DEV=  0 

0757 

WATER  OUTLET= 

85.2 

DEG 

F 

DE  V=  0 

1344 
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MAINLINE  ONOFF 
MAINLINE  ONOFF 


C 

C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c. 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


tt  * 

*  PROGRAM  ONOFF  * 

*  - - -  # 

*  # 


PURPOSE 

PERFORM  CERTAIN  USEFUL  FUNCTIONS  SUCH  AS 
TURN  SPECIFIED  LOOP  RECORDS  ON 
(OPTION  1) 

TURN  SPECIFIED  LOOP  RECORDS  OFF 
(OPTION  2) 

TURN  SPECIFIED  RING  BUFFER  LOOPS  ON 
(OPTION  3) 

TURN  SPECIFIED  RING  BUFFER  LOOPS  OFF 
(OPTION  4) 

INITIATE  BUFFERING  TO  DISK 
(OPTION  5) 

INITIATE  GAS  CHROMATOGRAPH 
(OPTION  8) 

STOP  GAS  CHROMATOGRAPH 
(OPTION  9) 

CALL  EXIT 
(OPTION  6*7  OR  10) 


USAGE 

QUEUE  FROM  TELETYPE  9  AND  ENTER  DATA  AS  REQUIRED 
REMARKS 

ONOFF  IS  A  PROCESS  PROGRAM  OPERATED  IN  AREA  4  UNDER 
MPX 

LOOPS  153*154  ARE  R.6.T*  LOOPS  OF  THE  EVAPORATOR 

SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
CHRTM 

THIS  SUBROUTINE  SHOULD  BE  STORED  IN  THE  COMPUTER 
BEFORE  LOADING  THE  MAINLINE  PROGRAM 

D.D.C*  LOOP  RECORDS  REQUIRED 

170*171*172,173*174,175*176*178*180*181*182.183*184 
*185,186*  187*188,153,154*210*211*212*213*214,215* 
216*221,222,223,224*  225,226*227,228*201*202 
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MAINLINE  ONOFF  ...(CONT’D) 

EXTERNAL  CHRTM 

DEFINE  FILE  1  (  60  *  80  *U *  I RC ) 

DEFINE  FILE  2  (  100  *  16 *U * KNEXT ) 

DIMENSION  ZERO (8 )  *  LP I D ( 1 9  )  >LPBF( 17 ) 

DATA  NLOOP/17/ 

DATA  NBUFF / 1 5 / 

DATA  LP I  D/170* 171 .172  » 173 * 174 *17  6 » 176 >178  » 180*181  *  182 
**183* 184* 

1185*186*187  *188  *153*154/ 

DATA  LP3F/210*211  *212  *213  *214*215*216*221  *222*223  *224 
**225*226* 

1227*228/ 

DATA  ZERO /8*0 • / 

DATA  NO/O / 

DATA  LPHX/Z154/ 

DETERMINE  WHICH  TELETYPE  TO  USE 


I  IN  =9 
I  OUT  =  I  I N 

C 
C 
C 

c 
c 
c 
c 
c 
c 
c 
c 
c 

1  WR I TE ( IOUT  *  2 ) 

2  FORMAT ( 1H0 *’ ENTER  OPTION’) 

1.0  CALL  FFINP(  IIN*l»Q*IOPT  *IERR) 

I  F (  I  ERR )  10*20*20 

20  GO  TO  (50*100*150*200*250*1000*1000*400*450*1000*1000 

*♦1000 )  *  I OPT 

C  OPTION  1  MAKE  DATA  ACQUISTION  LOOPS  OPERABLE 

50  CONTINUE 

DO  60  I 1 2  3 1  *  NLOOP 

60  CALL  OPER ( LP I D ( I ) ) 

WRITE ( IOUT  *  5 1 ) 

51  FORMAT ( ' LOOPS  ON ’ ) 


ENTER  WHICH  OPTION  TO  USE 
OPTION 

1  TO  MAKE  LOOPS  OPERABLE 

2  TO  MAKE  LOOPS  NONOPERABLE 

3  TO  MAKE  RING  BUFFERS  OPERABLE 

4  TO  MAKE  RING  BUFFERS  NONOPERABLE 

5  TO  START  BUFFERING  TO  DISK 

6  CALL  EXIT 

7  CALL  EXIT 

8  TO  START  G.  C. 

9  TO  STOP  G»  C. 
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MAINLINE  ONOFF  ...(CONT'D) 

C  CHECK  FOR  EVAPORATOR  RBT  LOOP 

CALL  FNDLP ( LPHX  *  LPAD ) 

I F ( LPAD )  70  >  70  *  1 
70  CONTINUE 

CALL  OPER ( LPID ( NLOOP+1 ) ) 

CALL  OPER  (  LP  I  D  (  NL.OOP  +  2  )  ) 

GO  TO  1 

C  OPTION  2  MAKE  DATA  ACQUISTION  LOOPS  NONOPERABLE 

100  CONTINUE 

DO  110  1  =  1* NLOOP 

110  CALL  NONOP ( LP I D ( I ) ) 

WR I TE ( I  OUT  *101) 

101  FORMAT (' LOOPS  OFF') 

GO  TO  1 

C  OPTION  3  MAKE  RING  BUFFERS  OPERABLE 

130  DO  160  1  =  1 » NBUFF 

160  CALL  OPE R ( LP6F (  I  )  ) 

WR I TE ( I  OUT  *151) 

151  FORMAT ('RING  BUFFERS  ON') 

GO  TO  1 

C  OPTION  4  MAKE  RING  BUFFERS  NONOPERABLE 

200  DO  210  1  =  1 *  NBUFF 

210  CALL  NONOP (LPBF ( I ) ) 

WR I TE ( I  OUT  *  20 1 ) 

201  FORMAT ( 'RING  BUFFERS  OFF') 

GO  TO  1 

C  OPTION  5  START  BUFFERING  TO  DISK 

250  DO  260  1  =  1  *  NBUFF 

CALL  CV  I  D ( LPBF (  I )  »LPHEX) 

CALL  RSLP (LPHEX  »LPAD) 

260  CALL  OPER ( LPBF ( I ) ) 

WRITE ( I  OUT  *  2  5 1 ) 

251  FORMAT ( '  BUFFERING  TO  DISK  INITIALIZED') 

WRITE  TIME  OF  RUN  INITIALIZATION  ON  GC  PRINT  OUT  ON 
TELETYPE  NO.  1 

CALL  TIME  ( I  HR  > IMIN.ISEC) 

WRITE  (10*270)  IHR*IMIN*ISEC 
270  FORMAT  (T25*  13*  '/'*  13*  '/'*  13*  T4Q *  'NEW  RUN 

*  INITIALIZED**** ' ) 
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MAINLINE  ONOFF  ...ICONT'O) 

WRITE  (1*20)  NO  *  I  HR  >  IN,  I  N  *  I  SEC 
GO  TO  1 

C  OPTION  8  START  GC 

C  DETERMINE  WHICH  COMPOSITION  TO  MEASURE  -  FEED  OR 

C  BOTTOM 

C  SUB  OPTION  0  -  MEASURE  BOTTOM  PRODUCT  COMPOSITION 

C  SUB  OPTION  1  -  MEASURE  FEED  COMPOSITION 

400  WR I TE ( IOUT  >402 ) 

402  FORMAT ( '  ENTER  0  FOR  NORMAL  RUN  1  FOR  FEED  RUN*) 

405  CALL  FFINP( 1 1 N  *  1  *  0  *  I  OPT  *  I  ERR ) 

I  F (  I  ERR )  405  1 407  >405 
407  CONTINUE 

I F (  I  OPT  )  430  #430  *431 

430  WRITE  ( I  OUT  *  433 ) 

433  FORMAT  ( T5  *  1  NORMAL  RUN*  IOPT  =  O') 

GO  TO  409 

431  CONTINUE 

WRITE  (IOUT  >436 ) 

436  FORMAT  (  T5  >  ' FEED  RUN*  IOPT  =  1') 

409  CONTINUE 

CALL  OPER ( 201 ) 

CALL  OPER ( 202 ) 

ICYLE  =  1500+200* IOPT 
CALL  CYCLE(11*1*11»ICYLE) 

C  SAMPLE  INJECT 

CALL  DOUT1  ( 1*8*1) 

C  LOOP  FOR  FIVE  SECONDS 

CALL  TIME ( I  HR* IMIN* I  SEC) 

410  CALL  TIME ( JHR*JMIN» JSEC) 

T  =  3600**( JHR- I  HR ) +60 • * ( JM I N- 1 M I N ) + JSEC- 1  SEC 
IF ( T-5 ) 4 1 0 *410*420 
420  CALL  DOUT 1 (1*8*0) 

WRITE ( I  OUT  *401) 

401  FORMAT (  1  GC  ON  1  ) 

WRITE  (1*20)  NO 
GO  TO  1000 

C  OPTION  9  STOP  GC 

450  CALL  NONOP ( 202 ) 

CALL  NONOP (201) 

CALL  CANCL(ll) 

WR  I  TE ( IOUT. 451) 

FORMAT ( *  GC  OFF ' ) 
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MAINLINE  ONOFF  •  •  • ( CONT • D ) 

CALL  EXIT 
END 
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SUBPROGRAM  CHRTM 
SUBPROGRAM  CHRTM 


C 

C 

C  SUBPROGRAM  CHRTM 

C  - 

C 

c 

C  PURPOSE 

C  CONTROL  THE  GAS  CHROMATOGRAPH 

C 

C  USAGE 

C  THIS  PROGRAM  IS  ACTIVATED  BY  ONOFF  MAINLINE  PROGRAM 

C  WHEN  BIT  If  LEVEL  11  IS  ON  (AREA  4) 

C 

C  SUBROUTINES  OP  SUBPROGRAMS  REQUIRED 

C  GC  AND  PEAK 

C 

C  REMARKS 

C  CHRTM  IS  AN  INTERRUPT  CORELOAD 

C  THE  FOLLOWING  DDC  LOOPS  ARE  REQUIRED 

C  20 1 t 202 

C 
C 


DEFINE  FILE  1 ( 100 # 16 f U t KNEXT ) #  2 ( 60 f 80 f U f K2 ) 

DIMENSION  COMP ( 5 ) f RFCTR ( 5 ) i I  DATA ( 127) # I  ERR  (  3  ) t START ( 2 ) 
*  *  END  (  2 ) 

DIMENSION  I HR1  (  80  )  i  IMIN1(80)»  ISECK80)*  ICOMP(80) 
DATA  LPIDfLPHEX/202fZ202/ 

DATA  RFCTR/5*1 • / 

DATA  START/0# #30./ 

DATA  END/30# #110#/ 


C  G.C.  RESULTS  ARE  PRINTED  OUT  ON  TELETYPE  10 


DATA  IOUT/10/ 

DATA  IMASK/ZOOFF/ 
DATA  NO/ 1 20/ 


C  STOP  DATA  ACQUISITION 


CALL  NONOP(LPID) 


SAMPLE  INJECT 
CLOSE  ECO 

CALL  DOUT 1 (  1  # 8  » 1  ) 

C  EXTRACT  DATA  FROM  LOOP  RECORD 
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SUBPROGRAM  CHRTM  •••<CONT*D) 

C  GET  ADDRESS  OF  LOOP  RECORD 

CALL  FNDLP(LPHEX*LPAD) 

C  CHECK  IF  LOOP  FOUND 

I F ( LPAD ) 10*10*20 

10  WRITE( I  OUT  » 1 1 ) 

11  FORMAT (•  LOOP  NOT  FOUND  ') 

GO  TO  250 

C  GET  CURRENT  POSITION  OF  RING  BUFFER  POINTER 

20  IPNTR=IAND(LD( LPAD+4 )  * I  MASK) 

C  CHECK  FOR  ZERO  POINTER  IN  RING  BUFFER 

I F ( I PNTR  )  2 1  *  2 1 »  25 

21  I PNTR=7 

C  TRANSFER  DATA  FROM  RING  BUFFER  TO  VECTOR  IDATA 

25  DO  60  1=1*120 

I F ( IPNTR-126)40*40*30 
30  I PNTR=7 

40  IDATA ( I ) =LD ( LPAD+ I PNTR ) 

60  I PNTR= I PNTR+1 

C  PROCESS  DATA 

CALL  GC ( COMP  *START  *END*RFCTR*1» *  I  DATA » 2  *  NO ♦ I  ERR ) 

C  CHECK  GC  ERROR  PARAMETERS 

DO  80  1=1*3 
I  F ( I  ERR ( I ) ) 70  *80  *70 
70  WRI7E( IOUT  *7  5 ) I *IERR( I ) 

80  CONTINUE 

75  FORMAT (  '  ERROR  NO  1  »  1 2  *  •  =  »*I5) 

CALL  T I M E ( I  HR  *  I M I N  *  I  SEC ) 

C  CHECK  WHICH  CALIBRATION  TO  USE 

I F ( COMP ( 2 )  )  130*  130*120 
120  IF(COMP(2)-*20) 140*160*160 

C  BOTTOM  PRODUCT  COMPOSITION 

140  COMPt  2 )  =  105*92*COMP(2 ) + • 2  24 
130  CALL  PTVLU(375*l*COMP(2) * IER) 
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SUBPROGRAM  CHRTM 


m.  (  CONT  1  D  ) 


C 

160 

180 

181 

C 

C 

C 

9000 

270 

275 

280 


250 


GO  TO  180 

FEED  COMPOSITION 

COMP(2)=97.33*COMP(2)+1.934 

WRITE ( I OUT *181 ) I  HR  * IM I N  *  I  SEC* COMP ( 2 ) 

FORMAT ( 1 10  * • / » *  12  * ' / 1  *  12 » •  G.C*  RESULTS 
*  COMPOSITION  =  • 

1 *F 10  #  3// ) 

OPEN  ECO 

CALL  DOUT 1 (1*8*0) 

RESTART  DATA  ACQUISITION 
CALL  OPER(LPID) 

WRITE  DATA  TO  FILE— TIME  AND  COMPOSITION 

READ  (2*20)  NDATA* IHRS* IMINS* ISECS 
WRITE  ( I  OUT  *9000 )  NDAT A  *  I  HRS  *  I M I  NS ♦ I  SECS 
FORMAT  { T 10  *  1 NDATA=  * •  415) 

IF  (NDATA)  280*280*270 
IF  (NDATA-80)  275*250*250 
READ  (2*21)  (IHR1U)*  I=1*NDATA) 

READ  (2*22)  (IMINl(I)*  I = 1 *NDATA ) 

READ  (2*23)  (ISECl(I)*  1  =  1*  NDATA ) 

READ  (2*24)  (ICOMP(I)*  I = 1 *NDATA ) 


NDATA=NDATA+1 

IHR1 ( NDATA ) = IHR 

IMIN1 (NDATA ) = IMIN 

ISEC1 (NDATA)=ISEC 

I  COMP (NDATA) =COMP ( 2 )*100. 

WRITE  (2*20)  NDATA* IHRS* IMINS * ISECS 
WRITE  (2*21)  ( I  HR  1 ( I ) *  I  =  1 *NDATA ) 
WRITE  (2*22)  ( IMIN1 ( I ) *  1=1 *NDATA ) 
WRITE  (  2  •  23  )  (ISECKI)*  I  =  1*NDATA) 
WRITE  (2*24)  ( I  COMP ( I )  *  I  =  1 *NDAT  A ) 

CALL  EXIT 
END 
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SUBROUTINE  PEAK 
SUBROUTINE  PEAK ( Y .NPTS *  I ER ) 


C 

C 

C  SUBROUTINE  PEAK 

C  - 

C 

C 

C  PURPOSE 

C  1.  DETERMINE  THE  START  OF  A  PEAK  (ISTRT)  AND  THE 

C  END  OF  A  PEAK  (  I  END )  BY  EXAMINATION  OF  FIRST 

C  DERIVATIVES 

C  2.  DETERMINE  IF  THE  BASE  LINE  IS  REACHED  AT  THE  END 

C  OF  A  PEAK.  IF  YES.  SET  NBASE  EQUAL  TO  1 

C  3*  CHECK  THE  DATA  FOR  ANY  VALUE  LESS  THAN  0  OR 

C  EQUAL  TO  37767 

C 


c 

DESCRIPTION 

OF  PARAMETERS 

c 

Y 

VECTOR  OF  INPUT  DATA  INTEGERS 

c 

NPTS 

NUMBER  OF  DATA  POINTS 

c 

I  ER 

ERROR  CODES 

c 

IERQ  ) 

=  0  •••  0*  K • 

c 

IERQ) 

+VE  ...  END  OF  DATA  DURING  PEAK  ELUTION 

c 

THEN  IERQ)  IS  EQUAL  TO  THE  VALUE  OF 

c 

THE  DERIVATIVE  AT  PEAK  END 

c 

I ER ( 2  ) 

NUMBER  OF  BAD  DATA  POINTS  ( I • E*  POINTS  OF 

c 

LESS  THAN  0  OR  EQUAL  TO  32767) 

c 

I  ER ( 3 ) 

=  0  •••  0.  K. 

c 

I  ER ( 3 ) 

=  1  •••  NUMBER  OF  PEAKS  FOUND  IS  DIFFE¬ 

c 

f* 

RENT  FROM  NUMBER  OF  PEAKS  SPECIFIED 

V- 

c 

USAGE 

c 

CALL  PEAK ( Y . NPTS . I ER ) 

c 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  NONE 

C 

c 

INTEGER  Y ( 1 ) 

DIMENSION  I ER ( 3 ) 

COMMON  H  .  I  STRT ( 5 ) »IEND(5)  .NBASE ( 5 )  . NPEAK 
DATA  DBST .DBEND.DB2.ITEST/3* .5. .3. .3/ 

DATA  DRV1.DRV1A.ICFST . I CFED .NCOND  » NGHG/0 • »0.»0>0»0»Q/ 

NDATA=NPTS-4 

DO  200  I  =  3  »NDAT A 

C  DATA  INTEGERTY  CHECK 


I  F  (  Y  (  I  )  )  6  »  7  *  7 


-  -a 


1  ' 2 ■  ’  *  v  VA  .  . •  i 7„0**Lc 

3/1 TU0H6U2 


iri/'  :  e*\  '  -  r*AT2  3ht  b.  if  83T3a2°i*uq 

•-  -  v  -  3  -  «i  5-  i-  .*■.<■  2ht  ii  sfiVlrx'3.! 

T-?  *  ^  BY  BI  *>A3q  A  BC 
c  u  ::  -  1  Vi  ■ 0 B  LJAO  3hT  >>3H3  •  £ 

3TS£  OT  JAUC3 

^  T  3*-  AJ  A  \  30  /•  0 1  <1*0230 


I  A  AC  T  -  I  ^  PCTOjV 

•  ^  •  s  •••  0  x 

i  •' j  ATA:  30  0.3  •  3v** 

21  (  i  )  *i3I  /  •  j 


•  -I[  2".  ><  •  •  •V...  ..A  •«  .  y„  v(Un 

,  _  *  /  • ^  •••  0  * 

-J  -»A  -  .  „  • . «  x  - 

■  3  j  y  vi,  MCP3  Ti  3 


Y 

*31 

U)>31 

<1)^31 


( SJ «3I 
it J  * 3 1 


■i;>A3U 

! .  3  2  i2Tqv  •  Y  )  >  A  3  q  j  j  AO 

C'  Iw  :i  A*  J  '^OITO/o  ■  a/4 A  23/ 1  TU088U2 

3/0/ 


<  X ) Y  :  303T/I 

U)f3I  /0I2/3MI0 

; 

■"  ••  *'■  t  ,  ..  "ao 

-  c r  *  ”2 oi  •  al vac#  i v/a  atao 

A-2T^/«ATAa/ 
AT AG/ t  £  =  I  OOS  CQ 


^03H0  YT*3£)3T/I  ATAO 

^♦Vtd( ( 1 )Y)31 


n  n  o  n  n 
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SUBROUTINE  PEAK  •••(CONT'D) 


7 

8 


6 


I ER ( 2 ) = I ER ( 2 ) +1 
GO  TO  9 

I F ( Y { I ) “3 2767)9*8*8 
IER(2)=IER(2)+1 


C 


COMPUTE  FIRST  DERIVATIVE  AT  Y(I-l) 


9 


DRV1B*DR V 1 


C 


COMPUTE  FIRST  DERIVATIVE  AT  Y ( I ) 


DRV1=DR VI A 

COMPUTE  FIRST  DERIVATIVE  AT  Y(I+1) 

SEVEN  POINT  LEAST  SQUARES  ESTIMATE  OF  FIRST  DERIVATIVE 

DRV1A*3#*(Y ( 1+4 ) -Y  < 1-2 )  )+2.*( Y ( 1+3 )-Y(  1-1 )  )  + 

1Y< I+2)-Y( I  ) 

DRVlAaDRVlA/(28.*H) 

IS  PEAK  IN  PROGRESS 

IF(NCOND) 10*10*40 

PEAK  IS  NOT  IN  PROGRESS 
CHECK  FIRST  DERIVATIVE  FOR  PEAK  START 

10  I F ( DRV1-DBST ) 190*20*20 

C  CONFIRM  PEAK  START  ITEST  TIMES 

20  ICFST= I CFST  +  1 

2  5  I F (  I CFST- I  TEST) 2  00*30*30 

C  PEAK  HAS  STARTED 

30  NCOND=l 

C  INCREMENT  PEAK  COUNTER 

NPEAKaNPEAK+l 
NBASE ( NPEAK ) «0 

C  SAVE  INDEX  OF  STARTING  POINT 

ISTRT (NPEAK)=I-ITEST+1 
I  CFST  =  0 
GO  TO  200 


C 


CHECK  FOR  PEAK  END 


a f  -c 


DD)»#*  3tfITUOP8U2 

I+tS>P3I*<S)P3I 

P  OT  00 
3 1  8 • P ( YdT££- { I  ) Y ) 3  I 
X+(S)P3I»(S)P3! 

A  .  VITAV^BC  T2PI3  3TU°  00 

xvPG*axvpa 

U)Y  * A  3VITAVIP3Q  T2PI3  3TU3M03 

Axv.f  a*.:v  c 

••(  >  I  “  I  JV-l£+i  )  v  (S-I)Y-lA+I)Y;*«£«AXVPG 

*  I  )Y-*S-fI  )YX 
(H*.9S)\AXVP0«AXVPa 

*2  » ■  Ke  y  c  ),  I  »3Q  £  J 

ca#c;*ci  ( c/03//) 3 1 

2^3'  00P3  /I  TOrt  21  XA33 
r  ?■  >* .  3  P03  3VITAV1P3G  T2PI3  *33-0 

;•  St (  px  ( Teea-  vac j 31 

r  TI  T  : ATS  >A3q  MPIW03 


T 

0 


3 

3 

OX 


X  +  T2331*T2^!3I  OS 

-  f  t  C  £  «  Q  S(T23T: -T£33I)3I 

03TPAT2  2AH  >A3P  3 

X  =  C/,03*1  0£  * 

R3T/U03  XA39  T/.3M3P3H1  3 


X«-XA33tf«*A3<W 
0s*  ( >A3PH)  30ASM 

T/IOQ  0HITPAT2  30  X3QtfI  3VA2 

X+T23TI-I  *(XA33/;)  TPT2I 

C  *  T  2  3  3 1 

GH3  >A39  PC3  >33 m "3 


n  rs 


SUBROUTINE  PEAK  ...(CONT'D) 

HAS  FIRST  DERIVATIVE  GONE  +VE  TO  ~VE 

I F ( NGHG ) 50  *  50  *70 
IF (DRV1 ) 60  » 200  *  200 

FIRST  DERIVATIVE  HAS  GONE  +  VE  TO  -VE 
NGHG= 1 

CHECK  FOR  PEAK  END 
IF ( DRV1+DBEND) 190*80*80 
CONFIRM  PEAK  END 
I  CFED= I CFED  +  1 

CHECK  FOR  START  OF  NEW  PEAK 

IF (DRV1“DBST)77  *75*75 
I CFST= I CFST+1 
GO  TO  78 
I CFST=0 

I F ( I CFED- I  TEST) 200  *87 *87 
PEAK  END 

SAVE  INDEX  OF  END  POINT 

IEND(NPEAK)=I-ITEST+1 

COMPUTE  2ND  DE I  VAT  I VE  AT  PEAK  END 

DRV2= (DRV1A-DRV1B) /(2.*H) 

REST  INDICATORS 

I  CFED  =  0 
NCOND=0 
NGHG=0 

CHECK  FOR  IMMEDIATE  START  OF  NEW  PEAK 
I F ( ICFST  )  88  *88  *  25 

CHECK  IF  BACK  ON  BASE  LINE  AT  PEAK  END 
IF (DRV2-DB2 ) 90*90*200 


BACK  ON  BASE  LINE 


)  •  *  * 


*  “  3VI~ AVI£30  T2PM  sah 

ov,  v* :  m o  or ) 3i 

C  )$  *  OCJSfOd  (  X V 51 G )  3  I 


l  OHOfl 
>A3q  «03  >D3HD 
*  •  391  (  Ci  3aG«*iV9C.  )  -  I 


3H3  XA39  MfHrOD 
I+0330I-033DI 
;A  ]u  wi^  ^3  T  •  ATS  *03  )Q3H0 

•v*<?  «  TT  ( ]  3P0-IVFC  )  31 

X-fTa3DI«T83DI 
ST  OT  CO 
C »TS^DI 

•  TSt  03S  ( '’S3TI  -033^1  ) 

CHS  XA33 
1 0-1  C/3  "C  X3C/I  1VA2 

*  +  T  237  I- 1*  ( >A3cy  ) Qj/1 3 1 


3  A  O/ITAVI30  GHS  STUP^OD 

•  s  \  (  :v5  -  nv  o  rsv  •  o 


SFOTADIC^I  TS3.q 


C*Q330 I 

o*omodh 

o*ohoh 


cJSt  88«  h8  (  T23DI  )  3  r 

*  *  ;  ••  -  -  v  ■ ,  -j  ;• 

3^lJ  3SA0  HO  *0A> 


r>  n 


SUBROUTINE  PEAK  ...(CONT'D) 

90  NBASE ( NFEAK ) = 1 

190  I  CFED  =  0 

I CFST=0 

200  CONTINUE 

END  OF  DATA  SET 
CHECK  FOR  ERROR 

IF (NPEAK) 250  » 25  0  >20  5 
205  IF (NCOND)250>250>210 

C  END  OF  DATA  DURING  PEAK  ELUTION 

210  I ER ( 1 ) SDRV1 

IEND(NPEAK)=NPTS-2 
NBASE (NPEAK) =1 
250  RETURN 

END 


I  3  '  •  y.OD)  .  •  •  jq  3H1TU08BU2 


-I.  A:  q.  )S./. 

w=Q J3DI 
0*Te33I 
3UMITMOD 


T3e  AT  AO  30  QV\3 
fl03  >03H3 


c -St OSStOeS  OjA39tt) 31 
01  OeStCcS  (0/103,1)  31 


fv»a«(xj«3i 

)  a  ■  ;• 

:=(>A33/,)32A8/ 
tf«UT3fl 
Q/3 


X 


• 
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SUBROUTINE  GC 

SUBROUTINE  GC  ( AREA  *  ST ART  *  END * RFCTR ♦ PTSEC ♦ Y * NUMBR 
**NPTS*IER) 


C 

C 

C  SUBROUTINE  GC 

C  - 

C 

C 

C  PURPOSE 

C  COMPUTE  AREAS  FOR  DIFFERENT  PEAKS  FOUND  BY 

C  SUBROUTINE  PEAK 

C 

C  DESCRIPTION  OF  PARAMETERS 


c 

AREA 

CALCULATED 

COMPOSITIONS 

c 

START 

START 

OF  TIME  BAND  FOR  PEAK 

c 

END 

END  OF 

TIME  BAND  FOR  PEAK 

c 

RFCTR 

VECTOR 

OF 

RESPONSE  FACTORS 

c 

PTSEC 

POINTS 

PER 

SECOND 

c 

Y 

VECTOR 

OF 

INPUT  DATA  INTEGERS 

c 

NUMBR 

NUMBER 

OF 

PEAKS  EXPECTED 

c 

NPTS 

NUMBER 

OF 

DATA  POINTS 

c 

I  ER 

ERROR 

CODES  (DEFINED  IN  SUBROUTINE  PEAK) 

C 

C  USAGE 

C  CALL  GC (AREA  *  START  *  END  * RFCTR * PTSEC * Y ♦ NUMBR *NPTS 

C  *  I ER  ) 

C 

C  SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 

C  NONE 

C 
C 

INTEGER  Y ( 1 ) 

DIMENSION  AREA ( 1 ) *  START ( 1 ) ♦ END ( 1 ) * RFCTR ( 1  )  *IER( 3 ) 
COMMON  H  *  I STRT ( 5  ) » I  END  C  5 )  *NBASE<5>  * NPEAK 
START(1)=0. 

NPEAK=0 
NO=  1 

DO  5  1=1*3 
5  I ER ( I  )  =0 

H=l. /PTSEC 

C  CALL  SUBROUTINE  PEAK  FIND  START  AND  END  OF  ALL  PEAKS 

CALL  PE AK ( Y  * NPTS  *  I ER ) 

IF(NPEAK)25Q*250*7 
7  CONTINUE 

C  CALCULATE  SIMPSONS  RULE  AREAS  FOR  PEAKS  DETECTED 


>c  -a 


3tfITU0«8U2 

. 

(  9  31  fdtq/* 


Y  uc'  ^  /  THIC  j  01  3A3PA  3TU^0-> 

> A  3 9  /ITuOfleu 2 

2,'3'"3*AflA  1C  irtOI T^I f 3230 
-•  I TI2C  03  .1TAJU3JA3 
01  Otf  ;  3MIT  10  TSAT2 
^  K.1  Ad  3'*  IT  10  0^3 

1  2T/.  1 0°} 

.  \1  \Q  T  jq  1  1  >  0T33V 

O  -  ,< :  23IA3-  -j  *3.  ij/ 

i  !  JG£ 


1  •  •  ■  •  •“••*.  ♦  8tA3flADd  JJA> 

<*3It 

-  :  -  ‘  A  c  '•>  ITDt-Jl  o.  a  23/ITU0A3U2 


'  )  A  T  «  f  ^  ^  it  *  -  1  -  v  ■  3 1  >  j  T  H  I 

*  (  I )  0  /  -j  t  (  I  )  T  5TA  T  2 «  ( I ) A3  A  *0I2K3MIG 

>A-q  'U)  ,,(c)C/,3I»(e)TPTe:#H  K0MM03 

•0* ( I ) TflAT2 
0«>A31H 
1*0^ 
€*I«I  e  OG 
0*< I)fl3X 
332T1\ •! «h 

-  A31  3WI TU088L2  JJA3 

I • 2T1^»  Y  J  >A3C  JJA3 
r  *  'CS«CeSOA3q/)lI 
auniTtfoc 


3.  3  ...  d> A;]q  2A;  PA  ljuq  2H021MI2  3TA JU3JA3 
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SUBROUTINE  GC  •••(CONT’D) 

DO  120  K= 1  ♦  NPEAK 
AREA ( K ) =0 • 

C  CHECK  IF  NUMBER  INTERVALS  EVEN  OR  ODD 

L=IEND(K)-ISTRT (K) 

X  =  FLOAT ( L  )  /2  • 

L  =  L/2 

IF(X-L)20*20*1Q 

C  ODD  NUMBER  OF  INTERVALS  ADD  ONE  INTERVAL  TO  PEAK 

10  I  END ( K )  =  I  END ( K ) +1 
20  I BGN  = I STRT ( K ) +1 

JEND= I  END ( K ) -1 

C  SIMPSONS  RULE  INTEGRATION 

DO  40  I  =  I BGN  *  JEND  *  2 

40  AREA(K)=AREA(K)+4**Y( I ) +2 • *Y ( I +1 ) 

AREA(K)=AREA(K)+Y( IBGN-1 ) -Y ( JEND+1 ) 

AREA(K)=AREA(K)/3. 

C  CHECK  IF  BACK  ON  BASE  LINE 

I F ( NBASE ( K ) ) 115  *  115  *50 

BACK  ON  BASE  LINE 

FIT  LEAST  SQUARES  LINE  TO  DATA  IMMEDIATELY  BEFORE  AND 
AFTER  PEAK 

50  SMXY=0* 

SMY  =  0  • 

SMX=0 • 

SMX2  =  0 • 

L  =  0 

I BGN= I STRT ( NO ) “3 
JEND= I  END ( K ) -1 

C  FOR  DATA  BEFORE  LAST  PEAK  ON  BASE  LINE 

DO  60  1=1*2 

L  =  L  + 1 

X= I BGN+ I 

1 1  =  IBGN+ 1 

SMXY  =  SMXY  +  Y ( I  I ) *X 

SMY=SMY+Y (II) 

SMX=SMX+X 

60  SMX2=SMX2+X**2 


i  ’  O) ... 


>  ;  si  c:i 

•  c *(>  )  A3PA 

c  -  0  H3V3  8JAVP3TH I  P38MUH  31  >Q3hD 

>  T/T8I-1  ^ )  a*13 1  =J 

•  S\ ( J ) TA0J3  =  x 
S\ J«  J 

,  01 • OS.  SI J-X)  I 
C  Jk'  T  I  3^0  QQA  S  JAVF3TK I  3C  P36MUH  QaO 

X  +  f  >)C/.3I  "OOQH3! 
I+C>>  TPT8I«  £591 
I-OJQ  3I*Q/3l 

Ol'A«03T.  I  3  JUP  8H08PMI8 

^•C  3l«:'0M  =*1  Oa  or 
1  I  +  I  )  Y*.SM  I  )  y*.A-M>}A3PAs(  >  )  A3  P  A 
{L  +  -  ->Y-(r-  )I)Y+M)A  £  A*  (>  )  A3P  A 

"•^\CX>A3P  v*C>)A3PA 

?.5XIteiI  (  <X)38A9H)3I 

3/IJ  38  A8  HO  DOA8 
"  '•  1  A  0  T  V. I J  8  a  c  :  1/  j  ip 


•C=YXM8 

•0»YY8 

•0*XY8 

•C-SXY8 

(  0  J  T T 8  I  -  CM 
i-(  >)0»43I  «QH3u 


■ 


s# i » i  ce  oa 

I ♦HD  IaX 
I ♦HO0I *  I  I 

X* ( I  I) Y+ YXMS  * YXY8 

- 

X+XV8«\M8 

S**X+SXM2»SXM8 
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SUBROUTINE  GC  ...(CONT’D) 

C  FOR  DATA  AFTER  PRESENT  PEAK 

DO  90  J  =  1  *2 
X- JEND+J 
I  I = JEND+J 
L  =  L  +  l 

SMXY  =  Y ( I  I ) *X+SMX Y 
SMY=SMY+Y  (II) 

SMX=SMX+X 
SMX2=SMX2+X**2 
90  CONTINUE 

X  =  L 

C  EQUATION  OF  LEAST  SQUARES  LINE  Y=SLOPE*X+A 

C 

C  COMPUTE  SLOPE  OF  LEAST  SQUARES  LINE 

SLOPE* ( SMXY-SMX*SMY/X ) / ( SMX2-SMX**2 /X ) 

C  COMPUTE  INTERCEPT  OF  LEAST  SQUARES  LINE 

A=SMY/X-SLOPE*SMX/X 
C  CORRECT  AREAS 

DO  110  I =NO  »K 

C=A+SLOPE/2.*( I STRT ( I )+IEND( I ) ) 

110  AREA(  I )=AREA( I ) -C*  ( IEND( I  > - 1 S T R T  C I ) ) 

NO=K+l 
GO  TO  120 
115  CONTINUE 

120  CONTINUE 

C  CHECK  IF  NO.  PEAKS  FOUND  =  NO.  SPECIFIED 

I F ( NUMBR-NPEAK ) 122.125  » 122 
122  I ER ( 3 ) *  1 

125  X=0 • 

C  ASSIGN  AREAS  TO  APPROPRIATE  TIME  BANDS 

C  TIME  BANDS  SPECIFIED  RELATIVE  TO  START  OF  FIRST  PEAK 

C  REFERENCE  TIME  =  START  OF  FIRST  PEAK 

REFTM* I STRT ( 1 ) *H 
DO  220  I  *  1 » NUMBR 
BAND  =  0 . 

DO  200  J= 1 .NPEAK 
TSTRT  =  H* I STRT ( J ) 

C  IS  PEAK  START  IN  THIS  TIME  BAND 


t  >  -a 


t<  »T  3) . 


■ 


rX*  j.  i.  eaPAuca  raASj  30  /.oitauos 
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*tOM«I  cxi  oc 
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•  0«0;1AS 
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SUBROUTINE  GC 


.  . .  { CONT ‘ D ) 


IF  (STARK  I  J+REFTM-TSTRT)  160.160  *200 
160  I  F ( END ( I )+REFTM-TSTRT) 200. 200  . ISO 

C  ADD  PEAK  AREAS  IN  THIS  TIME  BAND 

180  BAND=BAND+AREA(J) 

200  CONTINUE 
220  AREA (  I  )  =BAND 

C  CALCULATE  COMPOSITIONS 

DO  130  1  =  1.  NUMBR 
130  X=X+AREA( I )#RFCTR( I ) 

DO  140  1  =  1  .NUMBR 

140  AREA ( I ) = AREA ( I )*RFCTR( I > /X 
250  RETURN 
END 


I  ...  -  J 


■ 
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MAINLINE  GTDAT 
MAINLINE  GTDAT 


C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c. 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


************************************ 


*  * 

*  PROGRAM  GTDAT  * 

*  -  * 

*  * 


************************************ 


PURPOSE 

EXTRACT  DATA  BUFFERED  TO  DISK  FROM  DDC  AND  CONVERT 
TO  ENGINEERING  UNITS 

OUTPUT  DATA  ARE  PUNCHED  ONTO  CARDS  IN  10F8.3  FORMAT 

DESCRIPTION  OF  PARAMETERS 

NLOOP  NUMBER  OF  RING  BUFFERS 

NPTS  NUMBER  OF  DATA  POINTS  TO  BE  SORTED 

IDELT  POLL  TIME  FOR  RING  BUFFERS  (SEC.) 

IGC  PROGRAM  CONTROL  FLAG 

...  1  DUMP  G.C.  DATA  FROM  FILES 
•..-1  DO  NOT  DUMP  G.C.  DATA  FROM  FILES 
TITLE  RUN  TITLES 

LPID  LOOP  ID’S  OF  RING  BUFFERS 

A  CONA  OF  THE  CORRESPONDING  DDC  LOOP 

B  CONB  OF  THE  CORRESPONDING  DDC  LOOP 

TEMPT  TEMPERATURE  OF  THE  CORRESPONDING  DDC  LOOP 
(USED  FOR  FLOW  CORRECTION) 

...-1  FLOW  CORRECTION  IS  NOT  NECESSARY 
CMPSN  COMPOSITION  (WT  P  C)  OF  THE  FLOW  LOOP 
NAME  1 #  2  TITLES  OF  THE  CORRESPONDING  RING  BUFFERS 
FILE  1  NIGBD  USER  INTERFACE 

FILE  2  OUTPUT  FILE 

FILE  3  DAFLE 

FILE  5  G.C.  FILE 

USAGE 

ENTER  DATA  CARDS  AS  REQUIRED 


REMARKS 

THIS  IS  A  NONPROCESS  PROGRAM  WHICH  IS  ABLE  TO  SORT 
DATA  UP  TO  10  LOOP  RECORDS.  THE  FOLLOWING  FILES  ARE 
NECESSARY 

FILE  3  DAFLE  (PROVIDED  BY  DACS  CENTRE) 

FILE  3  PACO  1 

SUBROUTINES  AND  FUNCTION  SUBPROGRAMS  REQUIRED 
NIGBD*  GBOUT »  GBSRT  (PROVIDED  BY  DACS  CENTRE) 
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DEFINE  FILE  1 < 8 » 8 0 * U * K ) *  2 ( 5 0  *  80 » U ♦ K )  *  3 ( 64  *  320 * U ♦ K ) *  4 ( 8 
**160*U*K) 

DEFINE  FILE  5  (  60  *  30 *U > K5 ) 

REAL  NAME  1 ( 20 ) *  NAME 2 ( 20 ) 

INTEGER  DAOUT (320) 

DIMENSION  X  (  1 0  *  8  0  ) *  A ( 10)  *  B  (  1 0  ) *  L  P  I  D  (  1 0  )  *TEMPT(10)  * 
1CMPSN (10) *  T  I  TLE ( 2  0 ) 

DIMENSION  LIME ( 3 ) 

DIMENSION  I  HR ( 8  0 ) *  IMI N ( 80 )  •  I  SEC ( 80 )  » I  COMP ( 80 ) 

DATA  NO/80 / 

C  DEFINE  FLOW  CONVERSION  FUNCTIONS 

TEMP( T) =5.*(T-32. ) /9. 

DENS ( T*X ) =1.020 1-0. 5123E-03*T-Q . 15 12E-Q5*T**2-Q . 1519E 
*-02*100 .*X 

1  -0.81Q6E-05*( 1Q0.*X)**2 

C  READ  INPUT  DATA 

READ  (5*1)  NLOOP  »NPTS* IDELT  »  IGC 

1  FORMAT  (415) 

READ (5*3)  ( T  I  TLE ( I ) *1  =  1*20) 

3  FORMAT ( 20A4 ) 

WRITE(6*2)NLOQP»NPTS 

2  FORMAT (  1  '  *20X* 'NUMBER  OF  LOOPS ’* I  5 /2 1 X  * ‘ NUMBER  DATA 

*  PTS ’ *15) 

K  =  -l 

DO  10  1  =  1  *  NLOOP 
K  =  K  +  2 
J  =  K+1 

10  READ  (5*4)  LPID( I ) *A( I ) *B( I ) *TEMPT( I ) tCMPSN( I ) 

*  * ( NAME1 ( N )  *N  =  K  *  J )  * 

1 ( NAME2 ( N ) *  N  =  K  *  J ) 

4  FORMAT  ( 1 10 *4F10 *2 *4A4 5 
WR  I  TE ( 6  »  5 ) 

5  FORMAT ( •  '  *////*20X* 'LOOP  NO. '» 1  OX *' CONSTANT  A‘*10X 

*♦ 1  CONSTANT  B'  * 

1  ) 

WRITE(6*6)  ( LP I D ( I ) *A( I ) *B( I ) *1  =  1  * NLOOP ) 

6  FORMAT (  1  '  *20X*  15  ♦  10X * F 1 0 .4  * 10X * F 1 0 . 5 ) 

READ( 5*7 ) 

7  FORMAT ( 72X ) 

IF  (IGC)  9*8*8 


C 


IGC  +VE 


.  .  • 
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MAINLINE  GTDAT 


•  • 


. (CONT'D) 


8  READ  (5 
READ  (5 
READ  (5 
READ  (5 
READ  (5 


20)  NDATA •  IHRS*  IMINS*  ISECS 

21)  (  I  HR ( I ) *  1  =  1  iNDATA ) 

22)  (  I M I N (  I  ) ♦  I  =  1 *NDATA ) 

23)  (  I  SEC ( I ) *  1  =  1*  NDATA ) 

24)  ( ICOMP ( I ) *  1  =  1*  NDATA ) 


WRITE  OUT  G.C.  DATA 


WR  I  TE ( 6  *  9000 )  NDATA 
9000  FORMAT  (T40*  * NDAT A= ' *  15) 

WRITE  (6*12)  IHRS*  IMINS* ISECS 

12  FORMAT  (’1*////  T48*  'GC  RESULTS •/ /T40 *  15*  '/'*  15*  ' 
*/* »  15* 

•  »  STARTING  TIME' // T47 »  'TIME'*  T60*  'COMP'/  ) 

DO  11  I = 1 *NDATA 
COMP= I  COMP ( I ) /100. 

WRITE  (6*15)  I  HR ( I ) ♦  IMIN(I)*  I  SEC ( I )  *  COMP 

15  FORMAT  ( T40* 15* • / » *15  * ' /'  » I5*F10.3  ) 

11  CONTINUE 

WRITE  (5*16)  IHRS* IMINS* ISECS 

16  FORMAT  (315*  25X*  'STARTING  TIME') 

DO  14  1  =  1  *  NDATA 

COMP= ICOMP ( I ) /1QO. 

WRITE  (5*13)  IHR(  I  )  •  IMIN ( I ) *ISEC( I ) *COMP 

13  FORMAT  (315*  F10.3) 

14  CONTINUE 
WRITE  (6*17) 

17  FORMAT  ( ' 1» ) 


C  DEFINE  PARAMETERS  FOR  NIGBD 

9  CONTINUE 
IKIN  =  3 
IKOUT  =  1 
JRECW  =  80 
JRECR  =  8 

IF (NPTS-80 )20*20  *40 
20  NO  =  NP T S 
40  NREC=NPTS/80 

IF (NPTS-NREC*30 ) 2  50*80  *60 
60  NREC=NREC+1 
80  KRCNO=0 

C  CONVERT  LOOP  ID'S  TO  HEXADECIMAL 

DO  160  1=1 *NLOOP 

CALL  CV I D ( LP I D (  I ) *  IFUNC) 


C 
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MAINLINE  GTDAT  ...(CONT'D) 

CALL  NIGBDC I FUNC * NPTS * JRECW * jRECR * I K I N » I KOUT  * L I  ME 

*  *  I ERR1 *  I ERR2 ) 

C  CHECK  NIGBD  ERROR  PARAMETER 

I F ( I  ERR  1 “ 1  )  100*448*100 

100  WR I TE ( 6  *  10 1  )  LP I D ( I ) ♦ I  ERR  1 

101  FORMAT  (  *  1  *  10X  *  1  LOOP  I D ' ♦ 1 10/ 1 IX  * ' N I GBD  ERROR'*UO) 

NPTS  =  IERR2 

448  CONTINUE 

WRITE  (6  *777)  L I  ME ( 1 ) * L I  ME ( 2 )  ♦ L I  ME ( 3 ) 

777  FORMAT  (lOXt'TIME  LAST  VALUE  WAS  BUFFERED  IN  DISK  IS 

*  =  '  *  I  5  ♦  '  •  '  *  I  5  * 

1».  ' *15///) 

C  TRANSFER  DATA  FROM  INTERFACE  FILE  TO  OUTPUT  FILE 

DO  160  I RCNO  = 1 *NREC 
READ ( 1 ' IRCNO)  DAOUT 
KRCNO=KRCNO+l 
WRITE (2  *  KRCNO )  DAOUT 
IF (KRCNO-50 ) 160  *160*250 
160  CONTINUE 

C  ALL  DATA  ARE  IN  OUTPUT  FILE 

WRITE (6  *161 ) ( T I TLE { I ) *  1  =  1 *20)  *NPTS* IDELT 
WRITE (6  *162  )  ( NAME  1 ( I ) *  1  =  1 *20) 

WRITE (6  *162 ) ( NAME 2 ( I ) *  1  =  1 *20) 

WRITE (6  *  165 ) 

WRITE (5  *163  )  (TITLE ( I )» 1  =  1 *20)  *NPTS* IDELT 
WRITE (5  *166) ( NAME  1 ( I ) *  1  =  1 *20) 

WRITE (5  *166)  (NAME2 ( I ) *  1  =  1 *20) 

1 5 1  FORMAT (' 1 ' *20X*20A4»///35X * 'NO.  DATA  POINTS'*I5»' 

*  TIME  INCREMENT 

1  '  I  5  *  '  SEC.'///) 

162  FORMAT ( '  ' * 10X » 10 ( 2X *2 A4 ) ) 

163  FORMAT ( 20A4 * /10X ♦' NO.  P0INTS'»I5*'  DELT  T  *  *15*' 

*  SEC. ' ) 

165  FORMAT ( '  ' *///) 

166  FORMAT ( 20A4 ) 

DO  220  N  =  1  > N R E C 
KRCNO=N 

DO  200  I  =  1  * NLOOP 
READ( 2 ' KRCNO)  DAOUT 
KRCNO=KRCNO+NREC 

C  CONVERT  TO  ENGINEERING  UNITS 


DO  180  K  =  1  ♦  80 
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08 • X  =>  C8X  00 


MAINLINE  GTDAT 


...  (CONT'D) 


180  X  (  I  ♦  K  )  =  A (  I  ) /32767.0*DAOUT (K)+B ( I ) 

C  CHECK  FOR  FLOW  CORRECTION 

IF  ( TEMPT ( I  )  )  200  *  200 *190 
C  CORRECT  FLOWS 

190  CORRT=SQRT (DENS  (TEMP  (TEMPT  (  I  )  )  *CM.PSN(  I  )  / 100  •  )  ) 
DO  195  J  =  1  *  80 
X ( I  * J ) -X ( I t J)*CORRT 
195  CONTINUE 
200  CONTINUE 

C  PRINT  OUT  AND  PUNCH  ALL  THE  DATA 

DO  205  J  =  1  * N 0 

205  WRITE (6 #206) (X( I »J) *I=l*NLOOP) 

DO  207  J=  1  *  NO 

207  WR I TE ( 5  *208  )  ( X ( I » J ) *  1  =  1 *NLOOP ) 

206  FORMAT ( 1  « # 10X * 10F10. 3 ) 

208  FORMAT ( 10F8. 3 ) 

C  CHECK  IF  ALL  DATA  WERE  SORTED  OUT 

IF (NPTS-N#80-79 ) 2 10 #210 #220 
210  NO=NPTS-N*80 
220  CONTINUE 
250  WRITE  (6*260) 

260  FORMAT  ( ‘ 1 ' ) 

CALL  EXIT 
END 


•  »  v  i  \  { 


'»•••  TAOTO  3m:jhiam 

oeitoos«oQs  ((DTSMan  31 
2WOJ3  T33flf03 

o. i  n)Tq^3T)qM3T)2»i3a)TRce«TRfl03  oex 

0&tX»L  OQ 

3U/JTM02  aei 

3Utf I TWOO  OOS 

'AQ  3HT  JJA  H3KU9  OHA  TUO  ;MM 

50S  OG 

tqooj  ,  1*1.  (i».  I  ) X )  ( dOS«  2 ) 3T I HW  eos 

oi^ti*w  v os  oa 

V^IOOJ/U  x  *1*  <  Lt  I  )X)  (  80S*  e)  3TI3W  TOS 

J £.  :X3ox #xcx* »  * )  t Av.qo3  dcs 

(€•8301 JTAMH03  SOS 

U('  3E3W  ATAO  JJA  31  XD3H0  3 

-  *  •  CX S« OX  S  (  9?-08*>1«»£T9;/1 )  3 1 

08*/-£Tq/*OM  OX  S 
3U/ITHOO  OSS 
tOdStd)  3TIAW  08S 
( 'X  » )  TAMA03  OdS 
TIXJ  J  _  AO 


E-l 


APPENDIX  E 


DETERMINATION  OF  THE  CONTROL  TRAY  BY  THE  RQSENBROCK  METHOD 

To  determine  the  "optimum"  control  tray  by  Rosenbrock's 
method,  if  reflux  flow  is  used  as  the  manipulative  variable,  the 
strategy  is  to  prevent  any  change  in  composition  on  one  of  two  trays 
where  the  desired  liquid  composition  is: 


(E.l) 


If  steam  flow  is  to  be  manipulated,  the  strategy  is  to 
maintain  the  composition  on  the  tray  where  the  desired  vapor  composition 


is : 


(E.2) 


yi  =  yf  -  4  *XD  "  XW>  ‘ 


E.l  Location  of  the  "Optimum"  Control  Tray  for  the  University  of 

Delaware  Column 

For  the  University  of  Delaware  column,  the  following  data 
were  given  for  the  test  designated  as  Run  No,  8  by  Gerster  et  al . 


=  43.2  mole  %  acetone  y^  =  54.7  mole  %  acetone 
xD  =  79.2  mole  %  acetone  x^  =  8d  mole  %  acetone 
Xg  =  61.8  mole  %  acetone  yg  =  74.1  mole  %  acetone 


x-j  =  11.4  mole  %  acetone 


y3  =  44.6  mole  %  acetone 


E-2 


Using  these  data,  it  is  apparent  that  if  reflux  flow  is  used 
as  the  manipulative  variable,  either  tray  9  or  tray  1  should  be  used 
as  the  control  tray  and  if  steam  flow  is  used  as  the  manipulative 
variable,  tray  9  or  tray  3  should  be  used  as  the  control  tray. 

E .2  Location  of  the  "Optimum11  Control  Tray  for  the  University  of 

Alberta  Column 

For  the  University  of  Alberta  column,  the  following  data 
were  obtained  experimentally: 

x.p  =  38.0  weight  %  methanol  y^  =  64,0  weight  %  methanol 

xD  =  95.9  weight  %  methanol  Xy  =0.6  weight  %  methanol 

Xg  =  61.0  weight  %  methanol  y^  =  94.0  weight  %  methanol 

x2  =  10.0  weight  %  methanol  y2  =  40.0  weight  %  methanol 

Calculations  using  these  data  using  equations  (E.l)  and  (E.2) 
reveals  that  by  manipulation  of  reflux  or  steam  flow,  tray  6  or  tray  2 
should  be  used  as  the  control  tray. 

In  general,  of  top  product  composition  is  to  be  controlled, 
the  sensor  should  be  located  in  the  rectifying  section  and  if  bottom 
product  composition  is  to  be  controlled,  the  sensor  should  be  located 
in  the  stripping  section. 
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